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IDENTIFICATION 



PRODUCT CODE! 
PPODUCT NAMEI 
DATE CHEATEDS 
MAINTAINERS 
AUTHOPS 



MAI^DEC«ll»DFKAC«A«D 
11/34 EIS INSTRUCTION TESTS 
DECEMBEB 22$ 1975 
DIAGNOSTIC GROUP 
GLENN JOHNSON 



COPYRIGHT (C) 1975 

DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS, 

THIS SOFTWARE IS FURNISHED UNDER A LICENSE FOR USE ONLY 
ON A SINGLE COMPUTER SYSTEM AND MAY BE COPIED ONLY WITH 
THE INCLUSION OF THE ABOVE COPYRIGHT NOTICE, THIS 
SOFTWARE, OP ANY OTHER COPIES THEREOF, MAY NOT BE PROVIDED 
OR OTHERWISE MADE AVAILABLE TO ANY OTHER PERSON EXCEPT 
FOR USE ON SUCH SYSTEM AND TO ONE WHO AGREES TO THESE 
LICENSE TERMS, TITLE TO AND OWNERSHIP OF THE SOFTWARE 
SHALL AT ALL Tl^ES REMAIN IN DEC, 

THE INFORMATION IN. THIS DOCUMENT IS SUBJECT TO CHANGE 
WITHOUT NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMIT- 
MENT BY DIGITAL EQUIPMENT CORPOPTATION , 

DEC ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY 
OF ITS SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY 
DEC, 
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1« ABSTRACT 

THIS PROGRAM TESTS THE 11/34 EXTENDED INSTRUCTION SET 
<ASH, ASHC, M(tL, AND DIV> USING REGISTERS 0-5 AT- 
LEaST once WITH EACH INSTRUCTION, 
THE PROGRAM SHOULD BE RUN FOR 

AT LEAST 2 PASSES iwlTH ALL SWITCHES LOW, THE PROGRAM IS 

DESIG^'ED TO RUN UNDER APT« AND ACT« SYSTEMS, 

THIS PROGRAM IS A MODIFICATION OF THE LS1«11 EIS TEST« 

IT HAS BEEN MODIFIED TO ACCOUNT FOR ANY LS1«U « U/34 DIFFERENCESe 



2, REQUIREMENTS 



2,1 EQUIPMENT 



11/34 STANDARD COMPUTER 
AND 4K OF MEMORY 



2.2 STORAGE 

PROGRAM STORAGE - THE ROUTINES USE MEMORY • 17500 

2.3 PRELIMINARY PpOGRAMS 
NONE 

3, LOADING PROCEDURE 

USE STANDARD PROCEDURE FOR ABS TAPES, 

4, STARTING PROCEDURE 

4.1 CONTROL SWITCH SETTINGS 

SEE 5.1 (ALL LOW FOR WORST CASE TESTING) 

4.2 STARTING ADDRESS 
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hFtEB LOADING THE pPOGBAM IT SHOULD ALt^AYS BE STARTED AT 200® 
IF IT IS DESIPED TO SAVE THE PASS COUNTER THEN THE PROGRAM 
SHOULD BE FESTARTED AT LOCATION RESTRT CI«E« 2223 OTHERWISE THE 
PPOGRAH CAN BE RESTARTED AT 200 



4,3 PROGRAM AND/OR OPERATOR ACTION 



4^391 STAND ALONE 

1) LOAD PROGRAM INTO MEMORY USING ABS LOADER^ 

2) SET Sv^ITCHES (SEE SEC 5el) ALL LOW FOR i^OpST CASE^ 

3) START AT 200, 

4) THE PPOGHAM WILL LOOp AND "END PASS" WILL BE TYPED AFTER 
COMPLETION OF FIRST PASS AND EVERY 4TH PASS. HOWEVER TYPE 
OUT WILL BE SUPPRESSED IF BIT 5 OF LOCATION $ENVM IS HIGH 

5) A MINIMUM OF TWO PASSES SHOULD ALWAYS BE RUN, 

4,3,2 UNDER APT 

LOAD THE PROGRAM AND START AFTER SETTING THE DESIRED SWITCHES 
(SEE SEC, 5«n. 



5, OPERATING PROCEDURE 



5,1 SWITCH SETTINGS 

IF NO HARDWARE SWITCH REGISTER IS AVAILABLE# THE PROGRAM 
AUTOMATICALLY USES THE CONTENTS OF LOC, 176 AS THE SOFTWARE 
SWITCH REGISTER, THE USER SHOULD SET THIS LOCATION BEFORE 
STARTING THE PROGRAM, 



BIT # OCTAL VALUE FUNCTION 

15 100000f HALT ON ERROR 

13 020^00. INHIBIT PRINTOUT 

AN 8 BIT BYTE $FNVM [I.E. LOCATION 421] HAS BEEN USED TO DEFINE 
THE OPERATING MODE, ALL TYPEOUTS CAN BE SUPPRESSED BY MAKING 

BIT 5 OF BYTE $ENVM HIGH, IN OTHER WORDS BY PLCING A 20000 IN 
LOCATION 420 
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5^2 SUBROUTINE ABSTRACTS 



5«2«1 HALT ROUTIWE 

THIS ROUTINE CAi^LED VIA JSR INSTRUCTION I§ USED EACH TIME 
AN EpROR Is SEE^i AND AW ERROR MESSAGE OF THE FORMAT GIVEM 
IW SECt, 6«1 Is TYPED OUT UNLESS 5UPRESSED BY THE SWITCHES 
DEFINED IN SEC „ 5«1 



5«2,2 TRAP CATCHER 

A ''»4'2" ^HALT" SeOUEMCE IS REPEATED FROM 0«-776 TO CATCH 
ANY UNEXPECTED TRApS« THUS ANY UNEXPECTED TRAPS OR 
INTERRUPTS WILL HALT AT THE VECTOR t2e 



6, ERRORS 



6«1 ERROR PRINTOUT 

THE FORMAT IS AS FOLLOWS^ 

ADR ERRNM 

WHERE! 

ADR s ADDRESS OF ERROR 

ERRNM s ERROR NUMBER 

IN MOST CASES THE COMMENT BESIDE THE CALL FOR HALT SUBROUTINE 
TELLS WHAT WAS REING CHECKED AND WHAT WAS EXPECTED, ALL 
PRINTOUTS WILL BE SUPPRESSED WHEN BIT 5 OF LOCATION 
$ENVM IS HIGH, WHILE RUNNING UNDER APT THE DIAGNOSTIC 
WILL NOT SUPPORT SPOOLING OF CONSOLE OUTPUTS, 



6.2 ERROR RECOVERY 

RESTAPT AT 200 OR 222 (SEE SEC 4,2} 



7, RESTRICTIONS 
NONE 



8, MISCELLANEOUS 
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BA EXECUTION TIME 



NORMALLY FIRST '*END PASS" VwILL BE TYPED WITHIN i SECOND AND 
WITHIN 10 SECONDS FOp EVERY CONSECUTIVE 400 PASSES 



8«2 STACK POINTER 

STACK IS INITIALLY SET TO 600 



8s3 PASS COUNT 



A 16 BIT LOCATION "SPASS** LOCATION 406) IS USED TO KEEP 

PASS COUNT^ IT CAN BE CLEARED BY RESTARTING THE PROGRAM AT 200 



8»4 TEST NUMBER 

A 16 BIT LOCATION "STESTN" (I«Es LOCATION 404) IS USED TO KEEP TRACK 
OF THE TEST NtjMBER^ UPPER BYTE OF THIS LOCATION GIVES THE ITERATION 
NUHBEP AND THE LOWER BYTE THE TEST THAT WAS BEING EXECUTED 



8^5 POWER FAIL 

THE DIAGNOSTIC CAN BE POWER FAILED WITH NO EHRORSe TO USEf 
START THE TEST AS USUAL AND pOWER DOWN THEN Up AT ANY TlHE|, 
THE PROGRAM SHOULD RESTART FrOM TEST AFTER TYPING "pOWER" 
WITH NO ERRORS^ HOWEVER IF THE PROGRAM Is STORED IN A MOS 
HEMORY THAT CAN NOT HOLD DATA ^ITH POWER DOWN THEN THE PROGRAM 
WILL NOT RECOVER FrOM A POWER FAIL 



9,, PROGRAM DESCRIPTION 

THIS Program tests all the eis instructions of the 11/34 

FOR ASH AND AsHC INSTRUCTIONS EVERY EVEN PASS IS EXECUTED 
WITH DESTINATION MQDE FOR ALL REGISTERS AND EVERY ODD PASS 
WITH DESTINATION MODE. OF 67s THE DIAGNOSTIC DOES ^OT MAKE A 
PASS WITH T BIT SET, 

»ENDR 
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310 

111 fABS 

312 .NLI8T MD,MC#CND 

313 .LIST ME 

314 .TITLE DFKACA 

315 |*COPYRIGHT (C) DECEMBER 1975 

316 |*DIGITAL EQUIPMENT COBP, 

317 |»MAYNABD, MASS, 01754 
3ia I* 

319 |»PPOGRAM BY GLENN JOHNSON 

320 !• 

321 |*THIS PROGRAM V»AS ASSEMBLED USING THE PDP»U MAINDEC SYSMAC 

322 |»PACKAGE { MAINDEC«U -DIQAC-BU » AUG 29,1975. 

323 I* 

324 000001 9TNsl 

325 160000 SSWRat60000 nHALT ON ERROR, LOOP ON TEST, INHIBIT ERROR TYPOUT 
326 

327 



liiiii 

iililf 
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,B0 STRAP CATCHER » 776 



.SBTTL ACTll HOOKS 
jHOOKS REQUIRED BY ACTll 



339 




&01000 




SSVPCa, 


340 




000046 




,!B46 


341 


e00046 


{M6356 




SENDAD 


3 42 




000052 




,s52 


343 


000052 


000000 




.WORD 


344 




P01000 




,s$SVPC 


345 










346 




000000 


DUMMYs 





347 




r0000l 


ERRNMs 


1 


348 




000051 


Fs 


51 


349 




000176 


Ns 


176 


350 




^00007 


PCs 


%7 


351 




000006 


SPs 


%6 


352 




010701 


SCOPES 


10701 


35 3 




1510701 


SCOpEia 


10701 


354 




010703 


SC0PE3= 


10703 


355 




001000 


SW09a 


1000 


356 




B02000 


SW10S 


2000 


357 




(504000 


SWllB 


4000 


358 




§10000 


SWl2a 


10000 


359 




000004 


TYPES 


lOT 


3fc;^ 










361 










362 




000020 


.s20 




363 


000020 


016624 


8TYPE 





ySAVE PC 

nDSET L0C.46 TO ADDRESS OF SENDAD IN .8E0P 

j|2)SET L0C,52 TO EERO 
n RESTORE PC 



DFKACA 


MACYl 1 


30( 1046 


QfKkCh 


SRC 1 


8«N0V»7' 


364 




S?00400 


365 






366 






367 






368 






369 






370 






371 






372 


(300400 




373 


000400 


t(}00000 


374 


900402 


a00000 


37S 


000404 


000000 


376 


090406 


000000 


377 


000410 


000000 


378 


000412 


000000 


379 


00041 4 


000000 


38k4 


000416 


000000 


361 


00042^ 




382 


0^00420 


000 


383 


e!0042 1 


000 


384 


000422 


000000 


385 


W00 424 


000000 


386 


^00426 


§<90000 


387 






388 






389 






390 






39i 






392 






19 3 


1400 4 30 




394 






395 






396 






397 






398 






399 






4Mf? 






4aI 




PiJ0430 


4^)2 




000024 


40 3 


^0002 4 


300200 


404 




000044 


405 


$^00044 


000430 


406 




000430 


4k)7 






41)8 






409 






4 1 






411 


000430 




412 


00043a 


000000 


413 


^004 32 


t,00400 


414 


0004 3 4 


0W0003 


415 


!5004 36 


000005 


416 


5100 440 


000000 


417 


^004 42 


f!3000l4 


418 






419 




t,t?0430 
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5 

bSBttl apt mailbox-etable 



nftPT MAILBOX 
n MESSAGE TYPE CODE 
n FATAL ERROR NUMBER 
JITEST NUMBER 
JIPASS COUNT 
nDEVICE COUNT 

UNIT NUMBER 
MESSAGE ADDRESS 
nHESSAGE LENGTH 
nAPT ENVIRONMENT TABLE 
J lENVIHONMENT BYTE 
IjENVIRONMENT MODE BITS 
jjAPT SWITCH REGISTER 
nUSER SWITCHES 
nCPU TYPE, OPTIONS 
BITS l5-llsCPU TYPE 

1 1/04B01 1 11/05=02* 11 /20«03# 1 1/40«04# 11/45=05 
ll/70a06,PDQs07#Osl0 
BIT 10SREAL TIME CLOCK 
BIT 9aFL0ATING POINT PROCESSOR 
BIT BsMEMORY MANAGEMENT 





«EVEN 




SMAILl 






smsgty: 


.WORD 


AMSGTY 


SFATALI 


9WORD 


AFATAL 


6TESTN: 


.WORD 


ATESTN 


SPASSi 


.WORD 


APASS 


sdevct: 


,WORD 


ADEVCT 


6UNIT: 


sWORD 


AUNIT 


SMSGAD! 


,WORD 


AMSGAO 


SM5GLGJ 


,WORD 


AMSGLG 


SETABLEi 






$ENVj 


gBYTE 


AENV 


SENVMi 


.BYTE 


AENVM 


$SWREG| 


, WORD 


aswreg 


SUSWRs 


jWORD 


AUSWR 


$CPUOPj 


gWORD 


ACPUOp 



,SBTTL APT PARAMETER BLOCK 

;SET LOCATIONS 24 ^ND 44 AS REQUIRED FOP APT 

; »»«•«««««*»*«««*»«»»»»«*«•»««•»««««««»«««•#»«««»*»»*««»#«««*««* 
,8Xs. ifSAVE CURRENT LOCATION 

,s24 nSET POWER FAIL TO POINT TO START OF PROGRAM 
200 jifOP APT START UP 

,344 IIPOINT TO APT INDIRECT ADDRESS P^TR, 
SAFTHDR jjPOiNT TO APT HEADER BLOCK 
,is,SX fiRESET LOCATION COUNTER 
;««»*««»«»«»»»«**»»*«»«»*»»«*«««««»•«««««**»**««»*«»»»*»»«»*«*»« 

jSETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDPll DIAGNOSTIC 
; INTERFACE SPEC, 



SAPTHDS 

SHIBTSI 

SMBADPs 

STSTMi 

SPASTMi 

SUMTMj 



,WORD ;}TWO HIGH BITS OF 18 BIT MAILBOX ADDR, 

,WORD SMAIL fjAODRESS OF APT MAILBOX IBITS 0"15) 

.WORD 3 nPUN TIM OF LONGEST TEST 

.WORD 5 nP'JN TIME IN SECS, OF 1ST PASS ON i UNIT (QUICK VERIFY) 

,WORD jiADDlTlONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 

,WORD SETEND-SMAlL/2 j-LENGTH MAILBOX-ETABLE ( WORDS ) 
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DFKACA 


SRC 1 


g-N0V«75 


00100 


APT PARAMETER 


BLOCK 


420 


{.500 430 






COUNT! 






421 




000432 






,aC0UNT+2 


422 


6*00432 






PSWORD! 






423 




000434 






,sPSW0RD+2 


424 


000434 






TEMPI , 






4 25 




000436 






,aTEMPl+2 


426 


000436 






TEMP2J 






427 




000443 






,isTEMP2 + 2 


428 


^00440 






TEMP3J 






429 




(^00442 






aaTEMP342 


430 


'43044 2 






TEMP4! 






431 




000444 






,bTEMP442 


432 


000444 


^00000 




TEMP5I 


.WORD 




433 


£00 4 46 


000000 




TEMP61 


.WORD 




434 


300450 


000 




TYPCNTJ 


.BYTE 




435 


f»0a45l 


000 




8TPCNTI 


.BYTE 




436 


900452 


000007 




S0t 


7 




437 


000454 


177771 




Sit 


*7 




438 


^00456 


000454 




S2S 


SI 




439 


f^00460 


177772 




S3: 


-6 




440 


000462 


177777 




S4S 


"1 




441 


^00464 


040000 




S5: 


40000 




442 


^00466 


000464 




S6S 


55 




443 


#00470 


040000 




S7! 


40000 




444 


1300472 


177776 




S8: 


«2 




445 


000474 


E^00002 




S9l 


2 




446 


^00476 


000474 




S10{ 


S9 




4 47 


»a0S00 


000002 




sill 


2 




448 


000502 


177570 




SWRi 


177570 




449 


000504 


177570 




DlSPLAYl 




177570 


450 


1100506 


000064 




TTYOUTI 


64 




451 


000510 


177566 




STPB! 


177566 




452 


P00512 


177564 




8TPSI 


177564 




453 


300514 


005015 


020040 


000040 SCRLFi 


.ASCIZ 


<15><12>/ / 


454 


#00522 


006412 


047520 


042527 POWER! 


sASCIE 


<12><15>/P0WER/ 


455 


000530 


S90eU2 










456 














457 














458 














459 














460 














461 














462 














463 














464 














465 
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46& 




f?»0200 




467 


6.0^)200 


P12737 


016410 


46U 


000206 


012700 


000410 


469 


CHJ0212 


{505040 




473 




022700 


000400 


471 


'900220 


001 374 




472 


030222 


300167 


000352 


473 








474 




000600 




475 








476 




(£12705 


000404 


477 


L'09604 


005037 


000430 


478 


k>K)»)61? 


^12715 


000001 


479 


J?30t>l4 


012706 


000600 


48*) 


!'3d620 


P13746 


000004 


481 


i;0«a624 


P13746 


000006 


482 


c><)0630 


012767 


000644 


483 


',5006 36 


005777 


177640 


484 


»00642 


000407 




485 


1??00644 


t.12767 


000176 


486 


000652 


k>12767 


000174 


487 


tJ0066a 


022626 




488 


5«30662 


012637 


000006 


489 


at50666 


012637 


000004 


49^) 


¥■00672 


106427 


000000 


491 


1^00676 


132737 


000001 


492 


n100704 


001 403 




493 


«00706 


012767 


000422 


494 


5)00714 


012737 


000001 


495 


2J00722 


005037 


0004 36 


♦ 96 


^00726 


012737 


000001 


497 


i; 007 34 


005037 


000442 


498 








499 









2$i 



9S200 

MOV 
HOV 
CLR 
CMP 
BNE 

RESTRTJ JMP 
,=600 



177146 



177630 
177624 



177566 
000434 



#SPWRDN,^#24 

#8DEVCT,R0 

«(R03 

#SMAIL#P0 

2S 

BEGIN 



jPREPARE TO SERVICE POWER DOWN ROUTINE 
•PREPARE TO INITIALIZE THE STACK 



BEGINS 


MOV 


»8TEStN,R5 


;MAKE R5 POINT TO THK LOCATION STESTN 




CLR 


P»COUNT 


yCLEAP THE COUNTER 




HOV 


#1, (R5) 


•INITIALIZE TEST NUMBER 




MOV 


iBEGlNrSP 


STACK AT BEGIN »» 




MOV 


&#4,-(SP) 


yjSAVE ERROR VECTOR 




MOV 


9#6»-(SP) 






HOV 


tlS«4 


•ISET UP TIME OUT VECTOR 




TST 


^sm 


jlTBV TO REFERENCE HARDWARE SWR 




BP 


3S 


jfBRANCH IF NO TIMEOUT TRAP OCCURS 


ISl 


HOV 


#SWREG#SWR 


jlPOINT TO SOFTWARE SWR 




MOV 


#DISPrEG, DISPLAY 


jfPOINT TO SOFTWARE DISPLAY REG 




CMP 


(SP)+,(SP)+ 


•f RESTORE STACK 


3${ 


MOV 
MOV 


(SP)-»-,§#6 
(SP)+,0«4 


ylRESTORE ERROR VECTOR 




MTPS 


#0 


iPLACE »0 IN PSW 




BITS 


#l,a»$ENV 


yARE WE UNDER APT ? 




BEQ 


2$ 


•IF NOT THEN GO TO 28 




MOV 


8$SWREG,SWR 


jUSE APT SWITCH REGISTER 


2SJ 


MOV 


ll,i#TEMPi 


•TEMPi=l 
;TEMP2s0 




CLR 


?»TEMP2 




MOV 


»l,(a#TEMP3 


•TEMP3=1 




CLR 


P»TEMP4 


;TEMP4=0 
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DFKftCA, 




8-'NOV-75 


00100 


500 








501 








502 








503 








504 








505 








506 








507 








508 








509 








510 








5U 








512 








513 


0*50740 


010701 




514 


<f00742 


013700 


000434 


515 


i?00746 


f/32737 


000001 


516 


W00754 


fc>01004 




517 


?>00756 


013701 


000436 


518 








519 


000762 


es7200l 




520 


ki00764 


000402 




521 


,100766 


072067 


177444 


522 


{100772 


106737 


000432 


523 


000776 


123737 


000442 


524 


001004 


001403 




525 


5»01006 


f504767 


015426 


526 








527 


f?01012 


«00001 




528 


i'?01014 


f*05237 


000430 


529 


001020 


EJ23700 


000440 


530 


(^^01024 


^01 403 




531 


001926 






532 


^01026 


004767 


015406 


533 








534 


i501032 


000002 




535 


i»0l034 


021537 


000430 


536 








537 


001040 


001372 




538 


£01042 


005215 




539 


^01044 


010701 




540 


ff01046 


021527 


000037 


541 








542 


f!l01052 


002011 




543 


001054 


005237 


000436 


544 


001060 


006367 


177354 


545 


J>01064 


021527 


000020 


546 


301070 


e»0i004 




547 


®01072 


000167 


000764 


548 


001076 


004767 


001006 


549 


^01102 


610703 




550 


001104 


013701 


000434 


551 


001110 


032737 


000001 


552 


001116 


001004 




553 


001120 


013702 


000436 


554 


P01t24 


072102 




555 


1^01126 


000402 





14:09 PAGE 13 

ASH INSTRUCTION TESTS 



STARTI 



281 
481 



881 
PEGl I 



;*•#*»»«*»#«♦##»»»#«##*»*«##♦«** 

f ASH INSTRUCTION TESTS 



; »»««*««»«•«» 

I TESTS 1-36 
> »»»»»♦*#»##» 



SCOPEl 




MOV 


&#TEMP1,%0 


BIT 


Hr'?'»SP*SS 


BNE 


28 


MOV 


P#TEMP2,R1 


ASH 


R1,R0 


BR 


48 


ASH 


TEMP2,%0 


MFPS 


PKPSWORD 


CMPB 


e«TEMP4,§#PSW0RD 


BEQ 


,♦10 


JSR 


PC,8HLT 


I 




INC 


19#C0UnT 


CMp 


9»TEMP3,%0 


BEQ 


. + 10 


JSR 


pc#$hlt 


2 




CMP 


(R5)»a«C0UNT 


BNE 


68 


INC 


CR5) 


SCOPEl 




CMP 


(R5)»«37 


BGE 




INC 


I»TEMP2 


ASL 


TEMP3 


CMP 


(R5)»»20 


BNE 


REGl 


JMP 


NEGAT 


JSR 


PC,TST37 


SC0PE3 




MOV 


?»TEMP1,%1 


BIT 


«l,a#$PASS 


BNE 


2$ 


MOV 


9«TEMP2,R2 


ASH 


R2,Rl 


BP 


48 



•LOAD R0 WITH THE CONTENTS OF TEMPI 

•IS IT AN EVEN PASS ? 

;IF NOT THEN GO TO 2$ 

•OTHERWISE EXECUTE THE INSTRUCTION 

•IN MODE USING Rl 



(SHIFT R0 BY THE NUMBER SPECIFIED BY TEMP2 
;SAVE PS 



jSEEN AN ERROR, GO TO TH HALT ROUTINE 
;THE PS IS NOT EQUAL TO 

I INCREMENT THE COUNTER 

;IS THE RESULT IN R0 EQUAL TO TEMP37 



jSeEN an error* go to IH halt ROUTINE 
yEITHER INCORRECT R0 OR INCORRECT SEQUENCE 

;IS THE TEST NUMBER EQUAL TO THE 
yCOUNTER? 

J IF NOT GO TO THE HLT ABOVE 



jHAS THE CONTENTS OF REGISTERS BEEN SHIFTED LEFT 
;BY 14. AND RIGHT BY 14.7 



jSHIFT TEMPI LEFT, 

;HAS THE CONTENTS OF REGISTERS BEEN SHIFTED LEFT BY 14,? 

jIF SO GO TO NEGAT AND INITIATE RIGHT SHIFT 
;IF SO GO AND CONTINUE THE REST OF THE PROGRAM 

jLOAD Rl WITH THE CONTENTS OF TEMPI 
J IS IT AN EVEN PASS ? 
;IF NOT THEN GO TO 28 

•OTHERWISE EXECUTE ASH INSTRUCTION IN MODE 
yUSlNG Rl 
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556 


001 1 30 


072167 


1 77 302 




2$ 1 


ASH 


TEMP2,%1 


jSHIFT Rl BY THE NUMBER SPECIFIED TEMP2 


557 


001 1 34 


1 067 3? 


0(70i J2 




4S t 




i»PSWORD 


sSAVE PS 


558 


001 140 


,123737 


000442 


000*32 




C Pp 


ilTEMP4,l>#PSW0RD|lS THE PS a TEMP4 7 


559 


901 1 46 


001 403 








BEQ 


B + 10 




560 


001 130 


004767 


01 S264 






JSR 


PC#8HLT 


;SEEN AN ERRORf GO TO TH HALT ROUTINE 


561 
















;THE PS IS NOT EQUAL TO 


562 


001 154 


000003 








3 






563 


1)01 156 


005237 


000430 






INC 


P«COUnT 


; INCREMENT THE COUNTER 


56 4 


001 1 62 


023701 


000440 








&»TEMP3»%1 


;IS THE RESULT IN Rl EQUAL TO TEMP37 


565 


001 166 


001403 








BEQ 


. + 10 




566 


001 170 








6$ t 








567 


001 170 


004767 


013244 






JSB 


PCrSHLT 


;SEEN AN ERROR* GO TO TH HALT ROUTINE 


568 
















jEITHER INCORRECT Rl OP INCORRECT SEQUENCE 


569 


001 174 


000004 








4 






575? 


001 176 


(?2 1537 


000430 






CMP 


(R5)#S#C0UnT 


;IS THE TEST NUMBfcR EQUAL TO THE COUNTER? 


571 


001202 


001 3 72 








BNE 


6$ 


J IF NOT GO TO THE HLT ABOVE 


572 


S01 204 


005215 








INC 


(R5) 




573 


301206 


gl 0703 








SCOPES 






57 4 


001 210 


021527 


000037 






CMp 


(R5) # #37 


jHAS THt CO"Tc.NTS Or RbuIST&RS BtiftiN Srtir T&U liCf 1 


575 












;BY 14, AND RIGHT %t 14,7 


576 


30121 4 


00201 1 








BGE 


8$ 




577 


f?01 216 


005237 








INC 


9#TEMP2 




578 


b'01222 


006367 


177212 






ASL 


TEMP3 


•SHIFT TEMP3 LEFT 


579 


F01226 


021527 


000020 






CMp 


(R5)»#20 


•HAS THE CONTENTS OF REGISTERS BEEN SHIFTED LEFT 


580 


^01232 


001 004 










REG2 




581 


901234 


y00l67 


000622 






JMP 


NEGAT 


;IF SO GO TO NEGAT AND INITIATE RIGHT SHIFT 


582 


S'01240 


B04767 


000644 




8S 1 


JSR 


PC,TST37 


J IF SO GO AND CONTINUE THE REST OF THE PROGRAM 


533 


S?01244 


310701 






BEG2I 


SCOPEl 






58 4 


l$01246 


01 3702 


000434 








PtTEMPi,%2 


•LOAD R2 WITH THE CONTENTS OF TEMPI 


585 


P01 252 


S332737 


000001 






BIT 


«lf @#SPASS 


•IS IT AN EVEN PASS ? 


586 


D01263 


S01004 








BNE 


2S 


J IF NOT THEN GO TO 28 


587 


;?01 262 


013703 


000436 








§ITEMP2,R3 


yOTHERWiSE EXECUTE ASH INSTRUCTION IN MODE 


588 


30 1266 


t^72?03 








ASH 


R3,R2 


•USING R2 


589 


H0127fl 


000402 










4$ 




590 


»01272 


p72267 


1 77140 




2$ i 


ASH 


TEMP2,%2 


jSHIFT R2 BY THE NUMBER SPECIFIED BY TEMP2 


591 


(,J01276 


i 06737 


0004 32 




4$ 1 




f>«PSWORD 


;SAVE PS 


592 


001 302 


123737 


000442 


000432 




f-MDB 


9»TEMP4,6>«PSM0RD;IS THE PS s TEMp4 7 


593 


201 31 n 


Si01 403 








BEQ 


.♦10 




594 


)?01 317 


004767 


015122 






JSR 


PC,SHtT 


jSEEN AN ERROR, GO TO TH HALT ROUTINE 


595 












jTHF. PS IS NOT EQUAL TO 


596 


001316 


300005 








5 






597 


yei 320 


005237 


000430 






INC 


P#COUnT 




598 


V501 324 


i>237(ij2 


000440 








e#TEMP3,%2 


;IS THE RESULT IN R2 EQUAL TO TEMP3? 


599 


901 330 


4^01 403 








Q 


.♦10 














6S 1 








601 


C01332 


004767 


015102 






JSR 


PCrSHLT 


;SEEN AN ERRORf GO TO TH HALT ROUTINE 


f>^2 
















jEITHER INCORRECT R2 OR INCORRECT SEQUENCE 


603 


«401336 


^00006 








6 






6k)4 


#01340 


021537 


000430 






CMP 


tR5)ia#C0UNT 


J IS THE TEST NUMBER EQUAL TO THE COUNTER? 


6J5 


001344 


001372 








BNE 


6$ 


;IF NOT GO TO THE HLT ABOVE 


606 


eai346 


005215 








INC 


CR5) 




607 


f.01350 


1110701 








SCOPEl 






608 


iJ0l352 


021527 


000037 






CMP 


tR5),«37 


•HAS THE CONTENTS OF REGISTERS BEEN SHIFTED 


609 












yLEFT BY 14# AND RIGHT 14,? 


610 


(701356 


0S?2011 








BGE 


8$ 




fell 


SJ01360 


005237 


000436 






INC 


i#TEMp2 
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DFKftCA, 


,SRC 11 


3-NOV-75 


00100 




ASH INSTRUCTION 


612 


001364 


006367 


177050 






ASL 


613 


fijai370 


021527 


000020 






CMp 


614 


iJ01374 


001004 








BNE 


615 


001376 


§00167 


000460 






JMP 


616 


001402 


004767 


000502 




881 


JSR 


617 


901 406 


31 0701 






REG3I 


SCOPEl 


618 


^01410 


el 3703 


000434 






HOV 


619 


«01 414 


032737 


000001 


000406 




BIT 


620 


001422 


001004 








BNE 


621 


001424 


013704 


000436 






MOV 


622 


i?01430 


372304 








ASH 


623 


<^01432 


000402 








BR 


624 


^01434 


072367 


176776 




2$l 


ASH 


625 


001440 


106737 


000432 




48t 


MFPS 


626 


*}01444 


123737 


000442 


000432 




CMPB 


627 


301452 


001403 








BEQ 


628 


«901454 


004767 


014760 






JSR 


629 














630 


001460 


000007 








7 


631 


001462 


005237 


000430 






INC 


632 


001466 


023703 


000440 






CMP 


633 


001472 


001403 








BEQ 


634 


001474 








68S 




635 


00147 4 


004767 


014740 






JSR 


636 














637 


001500 


000010 








10 


638 


001502 


021537 


000430 






CMP 


639 


001506 


P01372 








BNE 


640 


001510 


005215 








INC 


641 


P01512 


010701 








SCOPEl 


642 


901514 


K21527 


000037 






CMP 


643 














644 


001520 


002010 








BGE 


645 


001522 


005237 


000436 






INC 


646 


CJ01526 


006367 


176706 






ASL 


647 


001532 


021527 


000020 






CMP 


648 


001536 


001003 








BNE 


649 


001540 


000550 








BR 


650 


001542 


004767 


000342 




881 


JSR 


651 


1)01546 


010703 






REG41 


SC0PE3 


652 


§101550 


013704 


000434 






MOV 


653 


001554 


010501 








MOV 


654 


001556 


032737 


000001 


000406 




BIT 


655 


001564 


001004 








BNE 


656 


001566 


^13705 


000436 






MOV 


657 


001572 


072405 








ASH 


658 


001574 


000402 








BR 


659 


001576 


072467 


176634 




281 


ASH 


660 


001602 


106737 


000432 




481 


MFPS 


661 


001606 


123737 


000442 


000432 




CMPB 


662 


001614 


001403 








BEQ 


663 


001616 


004767 


014616 






JSR 


664 














665 


1901622 


000011 








11 


666 


001624 


00S237 


000430 






INC 


667 


001630 


023704 


000440 






CMP 



TEMP3 

{R5),#20 

REG3 

NEGAT 

PC,TST37 

8#1EMP1,%3 
«lf 9#8PASS 
28 

P#TEMP2,R4 
R4,R3 
48 

TEMP2,%3 
0«PSWORD 



; SHIFTED TEMP3 LEFT 

jHAS THE CONTENTS OF REGISTERS BEEN SHIFTED LEFT BY 14,? 

jIF SO GO TO NEGAT AND INITIATE RIGHT SHIFT 
•IF SO GO AND CONTINUE THE REST OF THE PROGRAM 

jLOAD R3 WITH THE CONTENTS OF TEMPI 
J IS IT AN EVEN PASS 7 
ylF NOT THEN GO TO 28 

jOTHERWiSE EXECUTE ASH INSTRUCTION IN MODE 
lUSlNG R3 



•SHIFT R3 BY THE NUMBER SPECIFIED BY TEMP2 
ySAVE PS 

98TEMP4»@#PSW0RD;IS THE PS s TEM|>4 7 
,♦10 

PCSHLT jSEEN AN ERROR, GO TO TH HALT ROUTINE 

jTHE PS IS NOT EQUAL TO 0, 



@»C0UnT 

g»TEMP3,%3 

,♦10 

PCSHLT 



CR5)»(a#C0UNT 

68 

(R5) 



CR5)»«37 



§#TEMP2 

TEMP3 

(R5),«20 

REG4 

NEGAT 

PC,TST37 

f#TEMPi,%4 
R5,R1 

»1,9»8PASS 
28 

e#TEMP2,R5 

R5#R4 

48 

TEMP2,%4 

9#PSW0R0 



its THE RESULT IN R3 EQUAL TO TEMP37 



iSEEN AN ERROR, GO TO TH HALT ROUTINE 
{EITHER INCORRECT R3 OR INCORRECT SEQUENCE 



lis THE TEST NUMBER EQUAL TO THE COUNTER? 
I IF NOT GO TO THE HLT ABOVE 



jHAS THE CONTENTS OF REGISTERS BEEN SHIFTED 
•LEFT BY 14» AND RIGHT BY 14,7 



;SHIFT TEMP3 LEFT? 

;HAS THE CONTENTS OF REGISTERS BEEN SHIFTED LEFT BY U,? 

J IF SO GO TO NEGAT AND INITIATE RIGHT SHIFT 
ylF SO GO AND CONTINUE THE REST OF THE PROGRAM 

jLOAD R4 WITH THE CONTENTS OF TEMPI 
;SAVE R5 

,IS IT AN EVEN PASS 7 
J IF NOT THEN GO TO 28 

yOTHERWiSE EXECUTE ASH INSTRUCTION IN MODE 
;USING R4 



;SHIFT R4 BY THE NUMBER SPECIFIED BX TEMP2 
iSAVE PS 

g»TEMP4,f IPSWORDjIS PS s TEMP4 ? 
,♦10 

PC,8HLT jSEEN AN ERROR, GO TO TH HALT ROUTINE 

jTHE PS IS NOT EQUAL TO 

iiCOUNT 
i#TEMP3,%4 



J IS THE RESULT IN R4 EQUAL TO TEMP3? 
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66i 


001634 


&0I403 








BEQ 


,♦10 




669 


001636 








6$t 








67*5 




004767 


014376 






JSR 


PCfSHLT 


(SEEN AN ERROR* GO TO TH HALT ROUTINE 


67i 
















{EITHER INCORRECT R4 OR INCORRECT SEQUENCE 


672 


041642 


000013 








12 






673 


yai644 


010105 








NOV 


Rlf R5 


1 RESTORE R5 


674 




021537 


000430 






CMP 


(RS)»e#COUNT 


f IS THE TEST NUMBER EQUAL TO THE COUNTER? 


675 


»«)16S2 


001371 








BNE 


6$ 


1 IF NOT GO TO THE HLT ABOVE 


676 


^iJl654 


035213 








INC 


CR5) 




677 


&ai6S6 


010701 








SCOPEl 






678 


1,^01660 


021S27 


000037 






CMP 


CR5 )'»»37 


;HAS THE CONTENTS OF REGISTERS BEEN 


679 
















{SHIFTED LEFT BY 14, AND RIGHT BY 14,? 


680 


901664 


002010 








BGC 


8$ 




681 


^i4l666 


00S237 


000436 






INC 


i«TEMp2 




682 


JS01672 


006367 


176542 






hSh 


IEMP3 


J SHIFT TEMP3 LEFT 


683 


kJdl676 


021527 


000020 






cm 


(R5)»«20 


HAS THE CONTENTS OF REGISTER BEEN SHIFTED BY 14,7 


681 


©^1702 


001003 








BNE 


REGS 




685 


'^01704 


000466 








BR 


NEGAT 


jir so GO TO NEGAT AND INITIATE RIGHT SHIFT 


686 


^01706 


004767 


000176 




8$t 


JSR 


PC,TST37 


[ IF SO GO AND CONTINUE THE REST OF THE PROGRAM 


6B7 


t?3l7l2 


010701 






REG5I 


SCOPEl 






688 


1)01714 


010501 








MOV 


RSrRl 


^SAVE RS 


689 


1*01716 


4*13705 


000434 






MOV 


»»TEMP1,%5 


LOAD RS WITH THE CONTENTS OF TEMPI 


690 


001722 


032737 


000001 


000406 




BIT 


ll»9#$PASS 


IS IT AN EVEN PASS 7 


691 


301730 


001004 








BNE 


2S 


IF NOT THEN GO TO 31 


692 


i^0l732 


013700 


000436 






MOV 


»»TEMP2,R0 


Otherwise execute ash instruction in mode 


693 


001736 


072S00 








ASH 


R0f PS 


USING R5 


694 


001740 


000402 








BR 


4t 




695 


»01742 


072567 


176470 




291 


ASH 


TEMP2,%5 


;SHIFT RS BY THE NUMBER SPECIFIED BY TEMP2 


696 




106737 


000432 




411 


MFPS 


*»PSWORO 


SAVE PS 


697 


5^01752 


123737 


000442 


000432 




CMPB 


9«TEMP4,9fpSMORO 


IS PS 8 TEMP4 7 


698 


301760 


001403 








BEQ 


,♦10 




699 


001762 


004767 


0144S2 






JSR 


PC,SHl.T 


(SEEN AN ERRORi GO TO TH HALT ROUTINE 


7*»k» 
















THE PS IS NOT EQUAL TO 0, 


70t 


^01766 


000013 








13 






702 


M0i770 


005237 


000430 






INC 


••COUNT 




76?3 


^01774 


023705 


000440 






CMP 


?»TEMP3,%5 


f IS THE RESULT IN RS EQUAL TO TEMP37 


704 


i;0200H 


001403 








BEQ 


,♦10 




705 


^:|02002 








6$l 








7^6 


002002 


004767 


014432 






JSH 


pc»«hlt 


;SEEN AN ERROR» GO TO TH HALT ROUTINE 


7^7 
















r EITHER INCORRECT RS OR INCORRECT SEQUENCE 


7SJ8 


002006 


000014 








14 






709 


4502010 


021137 


H00430 






CMP 


IR1)#98C0UnT 


■IS THE TEST NUMBER EQUAL TO THE COUNTER? 


7t^ 


c}a2014 


001372 








BNE 


6$ 


IF NOT GO TO THE HLT ABOVE 


711 


002016 


010105 








MOV 


R1#R5 


RESTORE RS 


712 


002020 


(305215 








INC 


C R5 ) 




713 


1^32022 


010701 








SCOPEl 






714 


^?02024 


5*21527 


000037 






CHP 


(R5)»t37 


jHkS THE CONTENTS OF REGISTERS BEEN SHIFTED 


715 
















rLEFT BY 14. AND RIGHT BY 14,7 


716 


f02030 


002010 








BGE 


8$ 


;IF SO GO AND CONTINUE THE REST OF THE PROGRAM 


717 


C^20 32 


005237 


000436 






INC 


iSTEMP2 




718 


0d2036 


006367 


176376 






ASL 


TEMP3 


fSHIFT TEMP3 LEFT 


719 


S502042 


021527 


000020 






CMP 


(RS)f 020 


•HAS THE CONTENTS OF REGISTERS BEEN SHIFTED LEFT BY 


72^ 


302046 


001405 








BEQ 


NEGAT 


fIF SO GO TO NEGAT AND INITIATE RIGHT SHIFT 


721 


302050 


000402 








BR 


10$ 




722 


if02t/52 


004767 


000032 




B$S 


JSR 


PC,TST37 




723 


;)02056 


000167 


176656 




10$i 


JMP 


START 


;G0 BACK TO START 
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DFKftCA, 


SPC I 


8-N0V-75 


00100 




ASH INSTRUCTION 


TESTS 






724 


002062 


i'12737 


040000 


000434 


NEGATI 


MOV 


#40000, OITEMPI 


JTEMP1»40000 




725 


002070 


012737 


177762 


000436 




MOV 


»177762f eiTEMP2 


jTEMP2«177762 




726 


i»02076 


012737 


000001 


000440 




MOV 


•l,«iTEMP3 


|TEHP3»l 




727 


fe02104 


000167 


176630 






JMP 


START 






728 


002110 


021527 


000037 




TST37I 


CMP 


(R5)»»37 


;IS IT TEST 37? 




729 


R02114 


001013 








BNE 


TST40 


|IF NOT THEN TRY TEST 


40 


730 


t,i02116 


005037 


000434 






CLR 


eiTEMPl 


J0 




731 


002122 


012737 


000020 


000436 




MOV 


tl6.#9#TEMP2 


jSHIFTED BY 16 




732 


'^02130 


005037 


000440 






CLR 


P»TEMP3 


}IS»0 




733 


b02134 


012737 


000004 


000442 




MOV 


f 4,P#TEMP4 


;AND PSB4 




734 


B02142 


000207 








RTS 


PC 






735 


i«02144 


021527 


000040 




TST40I 


CMP 


(R5)M40 


;IS IT TEST 407 




716 


002150 


001003 








BNE 


TST41 


tlf NOT THEN TRY TEST 


41 


737 


002152 


005037 


000436 






CLR 


§ITEMP2 


;0 SHIFTED BY 080 AND 


PS84 


738 


?I02156 


000207 








RTS 


PC 






739 


^02160 


021527 


000041 




TST41 1 


CHp 


(R5}f «41 


;IS IT TEST 417 




74vl 


002164 


091004 








BNE 


TST42 


I IF NOT THEN TRY TEST 


43 


741 


1502166 


012737 


177760 


000436 




MOV 


#-l6,,9#TEMP2 


|0 SHIFTED BY -16.80 AND PSb4 


742 


S02174 


000307 








RTS 


PC 






743 


f?02l76 


021527 


000042 




TST42I 


CMP 


(R5)»«42 


|IS IT TEST 427 




744 


£32202 


001013 








BNE 


TST43 


J IF NOT THEN TRY TEST 


43 


745 


032204 


012737 


100000 


000434 




MOV 


#100000, 9«TEMP1 


; 100000 




746 


6;02212 


005237 


000436 






INC 


##TEMP2 


J SHIFTED BY "15 




747 


£902216 


005337 


000440 






DEC 


f »TEMP3 


jlSa-l 




748 


002222 


012737 


000010 


000442 




MOV 


#10,»lTEMP4 


|AND PSai0 




749 


002230 


000207 








RTS 


PC 






751^ 


302232 


021527 


000043 




TST43I 


CMP 


(RS)#»43 


;IS IT TEST 437 




751 


002236 


001012 








BNE 


TST44 


•IF NOT THEN IF NOT THEN TRY TEST 


752 


i«02240 


012737 


125252 


000434 




MOV 


#125252»9»TEMP1 


1125252 




753 


002246 


012737 


177777 


000436 




MOV 


#*l,i#TEMP2 


{SHIFTED BY "1 




754 


902254 


012737 


152525 


000440 




MOV 


#152525, i»TEMP3 


;IS>1S2S25 AND PS>10 




755 


^^02262 


^00207 








RTS 


PC 






756 


002264 


021527 


000044 




TST44I 


CMP 


(R5),»44 


|IS IT TEST 447 




757 


002270 


001012 








BNE 


TST45 


,IF NOT THEN TRY TEST 


45 


758 


(502272 


012737 


000001 


000436 




MOV 


#1,?»TEMP2 


J 125252 SHIFTED BY % 




759 


(!S02300 


012737 


052524 


000440 




MOV 


»52524#»#TEMP3 


|ISBS2S24 




760 


!^02306 


012737 


000003 


000442 




MOV 


•3,?fTEMP4 


;AND PS«3 




761 


&902314 


000207 








RTS 


PC 






762 


^02316 


021527 


000045 




T5T45I 


CMP 


(R5),«45 


J IS IT TEST 457 




763 


002332 


001012 








BNE 


TST46 


J IF NOT THEN TRY TEST 


46 


764 


002324 


012737 


177776 


000436 




MOV 


«-2f •iTEMP2 


1125252 SHIFTED BY -2 




765 


t*02332 


012737 


165252 


000440 




MOV 


«165252»§#TEMP3 


;IS«1652S2 




766 


002340 


012737 


000011 


000442 




MOV 


#11,»|TEMP4 


|ANO PS«11 




767 


If02346 


000207 








RTS 


PC 






768 


f 02 350 


021527 


000046 




TST46I 


CMP 


(RS}##46 


)IS IT TEST 467 




769 


0023S4 


001014 








BNE 


TST47 


J IF NOT THEN TRY TEST 


47 


770 


t»023S6 


012737 


177777 


0«0434 




MOV 


•-l,»lTEMPj 


l"l 




771 


002364 


012737 


000020 


000436 




MOV 


ll6,fll»TEMP2 


{SHIFTED BY 15, 




772 


002372 


005037 


000440 






CLR 


•«TEMP3 


;IS"0 




773 


002376 


012737 


000007 


000442 




MOV 


#7,i#TEMP4 


|AND PS87 




774 


002404 


000207 








RTS 


PC 






775 


#02406 


021527 


000047 




TST47I 


CMP 


(RS),t47 


;IS IT TEST 477 




776 


S!02412 


001011 








BNE 


TST50 


|IF NOT THEN TRY TEST 


50 


777 


002414 


005337 


000436 






DEC 


»#TEMP2 


1-1 SHIFTED BY IS 




778 


f02420 


012737 


100000 


000440 




MOV 


*100000#9«TEMP3 


;IS"100000 




779 


^02426 


012737 


00001 1 


000442 




MOV 


#11,»|TEMP4 


;AND PSbU 
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780 


002434 


000207 








RT5 


PC 




781 


002436 


021527 


000050 




fST50| 


CMP 


(R5), #50 


;1S 11 TEST 50 


782 


302442 


001007 








BNE 


ENT51 


ylF NOT THEN TRY TEST 51 


783 


002444 


012737 


137777 


000434 




MOV 


I137777»@»TEMP1 


;i37777 SHIFTED BY 15, IS=100000 


784 


002452 


012737 


000013 


000442 




MOV 


#l3r»#TEMP4 


jAND PSS13 


785 


^02460 


000207 








RTS 


PC 




786 


002462 


021527 


0000S1 




ENT51 1 


CMP 


CR5)##5l 


;IS IT ENTERING TEST 51? 


787 


f}02466 


001403 








BEQ 


> + 10 




78B 


002470 


004767 


013744 






JSR 


PCSHLT 


fSEEN AN ERROR, GO TO TH HALT ROUTINE 


789 
















yTEST NUMBER GOOFED 


790 


002474 


000015 








15 






791 


















792 


002476 


005726 








TST 


(SP)* 


jRESTOHE STACK POINTER 


793 


002500 


012704 


177771 






MOV 


»«7,%4 




794 


002504 


012702 


000454 






MOV 


SS1,%2 




795 


P02510 


012703 


000456 






MOV 


»52*%1 
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796 
797 
793 
799 
800 
801 
P02 
803 
804 
805 
806 
807 
808 
809 
810 
811 
812 
813 
814 
815 
816 
817 
818 
819 
820 
821 
822 
823 
824 
825 
826 
827 
828 
829 
830 
831 
832 
833 
834 
835 
836 
837 
838 
839 
840 
841 
842 
843 
844 
845 



; **««»««»»«««»»«»«*««»«»«»«»«««#«««»«««»*»««««•«#««»«««««««#«#«#««<»«« 

|TEST|51 11/34 ASH 125252 SHIFTED BY #5 s 52500 PS = 3 



1^02514 


010701 




TST51I SCOPEl 






002516 


012701 


125252 


MOV 


#125252f %1 


^LOAD Ri WITH 125252 


C02522 


072127 


000005 


ASH 


15, %1 


jSHIFT Rl BY #5 


0^2526 


136737 


000432 


HFPS 


?«PSWORD 


;SAVE PS 


002532 


122737 


000003 000432 


CMPB 


#3,f»#PSW0RD 


jlS THE PS 31 


002540 


001403 




BEQ 


, + 10 


002542 


004767 


013672 


JSR 


PC,$HLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 
•THE PS IS NOT EQUAL TO 3 


002546 


000016 




16 






ir02550 


022701 


052500 


CMP 


152500,%! 


flS THE RESULT 52500? 


f02554 


001403 




BEQ 


, + 10 




002556 






l$l 






002556 


004767 


013656 


JSR 


pc,$hlt 


fSEEN AN ERROR, GO TO TH HALT ROUTINE 
;R1 IS NOT EQUAL TO 52500 OH INCORRECT 


002562 


000017 




17 






002564 


021527 


000051 


CMP 


(R5)»#51 


JIS STESTN s #51 


002570 


001372 




BNE 


1$ 


;IF NOT THEN GO TO HLT ABOVE 


002572 


005215 




INC 


(R5) 





002574 
002576 
002602 
002606 
002612 
002620 
^02622 

fc?02626 
002630 
002634 
002636 
002636 

902642 
002644 
©02650 
002632 



010701 
012700 
072077 



125252 
175650 



?TEST|52 11/34 ASh 125252 SHIFTED BY 9S2 = 177525 PS = 10 

TST52I SCOPEl 



106737 000432 
122737 000010 
001403 

004767 013612 
000020 

022700 177525 
001 403 

004767 013576 



000021 
021527 
001372 

00S215 



MOV 


#125252, %0 


;LOAD R0 WITH 125252 


ASH 


PS2,%0 


ySHIFT R0 BY 9S2 


MFPS 


?«PSWORD 


*SAVE PS 


CMPB 


»10,i»PSWORD 


jlS THE PS 10? 


BEQ 


t + 10 




JSP 


PC,$HLT 


;SEEN AN ERROR, GO TO TH HALT 






jTHE PS IS NOT EQUAL TO 10 


20 






CMP 


#177525, %0 


jIS THE RESULT 177525? 


BEQ 


t + 10 




JSR 


PCfSHLT 


iSEEN an ERROR, GO TO TH HALT 






jR0 IS NOT EQUAL TO 177525 OR 


21 
CMP 


(R5),#52 


tlS $TESTN a #52 


BNE 


1$ 


|IF NOT THEN GO TO HLT ABOVE 


INC 


(RS) 
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ASH INSTPUCTION TESTS 



846 
847 
848 
849 



?TEST|53 U/34 ASH 125252 SHIFTED BY i#Sl a 177525 PS a 10 



854^ 


092654 


010701 


TST53I 


SCOPEl 






851 


i»»2656 


012700 


125252 


MOV 


#125252#%0 


jLOAD R0 WITH 125252 


"52 


002662 


072037 


000454 


ASH 


P«S1,%0 


jSHIFT R0 BY i»Sl 
ySAVE PS 


853 


002666 


106737 


000432 


MFPS 


9#PSW0RD 


854 


002672 


J22737 


000010 000432 


CMPB 


#10,9#PSWORD 


jlS THE PS 107 


853 


002700 


001403 




BEQ 


.♦10 




856 


302702 


004767 


013532 


JSR 


PC,$HLT 


jSEEN AN ERROR, GO TO TH HALT 


857 












;THE PS IS NOT EQUAL TO 10 


858 


?»»2706 


000022 




22 






85' 


00271k) 


022700 


177525 


CMP 


#177525, %0 


;IS THE RESULT 177525? 


860 


&i}27l4 


001403 




BEU 


,4-10 




861 


002716 




ISi 








862 




004767 


013516 


JSR 


PCfSHLT 


jSEEN AN ERROR, GO TO TH HALT 


86? 












•R0 IS NOT EQUAL TO 177525 OR 


864 


2«}2722 


000023 




23 






865 


Cd2724 


021527 


000053 


CMP 


(R5)»»53 


JIS STESTN = #53 


666 


r.3273« 


001372 




BNE 


IS 


;IF NOT THEN GO TO HLT ABOVE 


867 


^02732 


005215 




INC 


(R5) 





868 
809 
870 
871 
872 
873 
874 
R75 
87b 
877 
878 
879 
fl80 
881 
882 
883 
804 
885 
886 
887 
889 
869 
890 
891 
892 
893 
894 
995 



; »••«»«««»«»»«»«»»««»»»»«»«»««*«»««««»«»««»««»»»»«««»•*«•«««*«»*»«**« 

jTESTi54 11/34 ASH 125252 SHIFTED BY (2) = 177525 PS s 10 



002734 
Q02736 
'502742 
f'02744 
t/0275') 
V>32756 
f,'"^2760 

feV42 764 
kI02766 
«902772 
»I02774 
1102774 

303000 
'103002 
((J03006 

«03010 



010701 
012700 
072012 
106737 
122737 
00140 3 
004767 

000024 
022730 
001 403 

004767 

030025 
r?2l527 
001 372 
tJ35215 



000432 
000010 

013454 
177525 
013440 
000054 



TST541 SCOPEl 
MOV 
ASH 
MFPS 
CMPB 
BEQ 
JSR 

24 

CMP 
BEQ 

ISI 

JSP 

25 
CMP 
BNE 
INC 



,%0 



#125252^ 
(2),%0 

98PSWORD 
#10,?«PSWObD 

PC,SHLT 



#177525, %0 
.♦10 



pcshlt 



yLOAD R0 WITH 125252 
jSHIFT R0 BY (2) 
;SAVE PS 
;IS THE PS 10? 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
|THE PS IS NOT EQUAL TO 10 

JIS THE RESULT 177525? 



jSEEN AN ERROR, GO TO TH HALT ROUTINE 

;R0 IS NOT EQUAL TO 177525 OR INCORRECT SEQUENCE 



tR5),S54 
IS 

(R5) 



;IS STESTN = #54 
:IF NOT THEN GO TO HLT ABOVE 
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DFKRCA, 


,SBC 16 


l»NOV-75 


00100 


896 








897 








898 








899 








9v)0 


003012 


010701 




901 


»03014 


012700 


125252 


902 


;303020 


072022 




903 


003022 


1«6737 


000432 


904 


«d3026 


122737 


000010 


905 


00303 4 


001 40 3 




906 


i?03036 


004767 


013376 


907 








908 


«03042 


000026 




9«9 


0<)3044 


022700 


177525 


910 


S303050 


001403 




91 I 


y03052 






912 


003052 


004767 


013362 


913 








914 


^03056 


000027 




915 


003060 


021527 


000055 


916 


803064 


001372 




917 


!»03066 


005215 




918 








919 








920 








921 








922 








923 








924 








925 


003070 


010701 




926 


S103072 


012700 


125252 


927 


003076 


072042 




928 


003100 


106737 


000432 


929 


003104 


122737 


000010 


930 


003112 


001403 




931 


5103114 


004767 


013320 


932 








933 


003120 


000030 




934 


003122 


022700 


177525 


935 


003126 


001403 




936 


003130 






937 


003130 


k,04767 


013304 


93S 








939 


003134 


000031 




940 


(103136 


021527 


000056 


941 


903142 


001372 




942 


003144 


005215 




943 








944 








945 









14109 PAGE 21 

ASH INSTRUCTION TESTS 



SCOPEl 




MOV 


#125252, %0 


ASH 


(2)+,%0 


MFPS 


P#PSWORD 


CMPB 


#10,9»PSWOrD 


BEQ 


. + 10 


JSR 


PC,SHLT 


26 




CMP 


#177525, %0 


BEQ 


,♦10 


JSR 


pcshlt 


27 




CMP 


(R5),«55 


BNE 


IS 


INC 


(R5) 



yLOAD R0 WITH 125252 
ySHIFT R0 BY (2)+ 
iSAVE PS 
;IS THE PS 10? 

;SEEN AN ERROR, GO 10 TH HALT ROUTINE 
jTHE PS IS NOT EQUAL TO 10 

jIS THE RESULT 177525? 



jSEEN AN ERROR, GO TO TH HALT ROUTINE 

!P0 IS NOT EQUAL TO 177525 OR INCORRECT SEQUENCE 



;IS STESTN s #55 
J IF NOT THEN GO TO HLT ABOVE 



|TESTi56 11/34 ASH 125252 SHIFTED BY -(2) « 177525 PS a 10 



TST56I SCOPEl 



MOV 


#125252, %0 


ASH 


-(2),%0 


MFPS 


e#PS^ORD 


CMPB 


#10,9#PSWOrD 


BEQ 


.♦10 


JSR 


PC,$HLT 


30 




CMP 


#177525, %0 


BEQ 


.♦10 


JSR 


PCSHLT 


31 




CMP 


(R5),«56 


BNE 


IS 


INC 


(R5) 



jLOAD R0 WITH 125252 
jSHIFT R0 BY -C2) 
J SAVE PS 
;IS THE PS 107 

|SEEN AN ERROR, GO TO TH HALT ROUTINE 
jTHE PS IS NOT EQUAL TO 10 

jIS THE RESULT 177525? 



;SEEN AN ERROR* GO TO TH HALT ROUTINE 

yR0 IS NOT EQUAL TO 177525 OR INCORRECT SEQUENCE 

;IS STESTN s #56 
J IF NOT THEN GO TO HLT ABOVE 
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946 

947 

948 
949 





003146 


0t 0701 




TST57 1 


SCOPEl 




951 




J 2700 


125252 




MOV 


8125252»%0 


9S3 


&031S4 


072063 


000002 




ASH 


2(3)»%0 


953 


003160 


106737 


000432 




MFPS 


@»PSWORD 


954 


003164 


122737 


000011 000432 




CHPB 


lll»9«PSW0RD 


955 


903172 


001403 






BEQ 


, + 10 


956 


003174 


004767 


013240 




JSR 


PCSHLT 


957 














958 


003200 


000032 






32 




959 


003203 


022730 


177252 




CMP 


«177252»%0 


960 


£03206 


001403 






BEQ 


» + 10 


96i 


003210 






l$l 






962 


003210 


004767 


013224 




JSB 


pc,$hlt 


963 














964 


003214 


000033 






33 




965 


i903216 


P21527 


000057 




CMP 


CR5)»«57 


966 


003222 


001372 






BNE 


19 


967 


^03224 


005215 






INC 


CR5) 



I »•»•••••»«»«**•«»•»•»««••**«»*«•«**«**•»«««»«*«#*««#**•«•«•#**«««»«• 

|TEST|57 11/34 ASH 125252 SHIFTED BY 2C3) s 177252 PS a II 

}••««««)»*««»«»•«**•«•«*••••«»«••»»«»#••«««•«*«*•««»««•«*«*«#««»«*•*•• 



iLOAO R0 WITH 125252 
iSHIFT R0 BY 2(3) 
I SAVE PS 
lis THE PS 11? 



{SEEN AN ERROR, GO TO TH HALT ROUTINE 
|THE PS IS NOT EQUAL TO 11 

jIS THE RESULT 1772527 



;SEEN AN ERROR* GO TO TH HALT ROUTINE 

|R0 IS NOT EQUAL TO 177252 OR INCORRECT SEQUENCE 



968 
969 
970 
971 
972 
973 
974 



975 


W03226 


010701 


TST60I 


5C0PE1 




976 


003230 


U12700 


125252 


MOV 


«125252#%0 


977 


003234 


072073 


000000 


ASH 


»(3)#«0 


978 


1503240 


J06737 


000432 


MFPS 


0«pswoRn 


979 


»}03244 


J22737 


000010 000432 


CMPB 


»10f @«psword 


980 


003252 


001403 




BEQ 


,♦10 


981 


90325 4 


004767 


013160 


JSR 


PCSHLT 


982 
983 


S03260 


00003'^ 




34 




984 


S>03262 


022700 


177525 


CMP 


#177525,10 


985 


^03266 


001403 




BEQ 


,♦10 




003270 




l$l 






98 7 


003270 


004767 


013144 


JSR 


pc#$hlt 


988 
989 


003274 


000035 




35 




990 


003276 


021527 


000060 


CMP 


(R5),»60 


991 


003302 


001372 




BNE 


1$ 


992 


003304 


005215 




INC 


(R5) 



lis ITESTN ■ #57 

I IF NOT THEN GO TO HLT ABOVE 



|TEST|60 11/34 ASH 125252 SHIFTED BY 9(3) » 177525 PS a 10 

;#♦####»*»#»#»♦*##«*#»#»#»#*########»*#«»•#•#»#♦»♦••»••»«•♦♦#»*•»»*•» 



;LOAO R0 WITH 125252 
jSHIFT R0 BY 9(3) 
jSAVE PS 
|IS THE PS 10? 

;5EEN AN ERROR, GO TO TH HALT ROUTINE 
iTHE PS IS NOT EQUAL TO 10 

lis THE RESULT 177525? 



iSEEN AN ERROR, GO TQ TH HALT ROUTINE 

|R0 IS NOT EQUAL TO 177525 OR INCORRECT SEQUENCE 

IIS STESTN 8 »60 
I IF NOT THEN GO TO HLT ABOVE 



993 
994 

995 
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996 








997 








998 








<>99 








1000 


(103306 


010701 




1001 


903310 


012700 


125252 


1002 


003314 


072033 




1003 


003316 


106737 


000432 


1004 


003322 


122737 


000010 


1005 


003330 


001403 




1006 


003332 


004767 


013102 


1007 








1008 


003336 


00003b 




1009 


003340 


022700 


177525 


1010 


003344 


001403 




1011 


003346 






1012 


0-33346 


004767 


01 3066 


1013 








1014 


003352 


000037 




1015 


033354 


021527 


000061 


1016 


003360 


001372 




1017 


^03362 


005215 




1018 








1019 








1020 








1021 








1022 








1023 








1024 








1025 


003364 


010701 




1026 


003366 


012700 


125252 


1027 


003372 


072053 




1028 


003374 


106737 


000432 


1029 


003400 


122737 


000010 


1030 


003406 


001403 




1031 


^03410 


004767 


013024 


1032 








1033 


003414 


000040 




1034 


003416 


022700 


177525 


1035 


003422 


001403 




1036 


003424 






1037 


003424 


004767 


013010 


1038 








1039 


003430 


000041 




1040 


003432 


021527 


000062 


1041 


003436 


001372 




1042 


§03440 


005215 




1043 








1044 








1045 
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I #»*«»»»«»»««»»««»»«««#»»««»»*»»#*•#»»«»»#»»»»**»»■»»»»##»**»»«»»»»»«* 
|TEST|61 11/34 ASH 125252 SHIFTED BY 9(3)+ a 177525 PS s 10 

I ««»»«»#«»»««»««»»«««»«»«•»»«««»»»««««»##«««»««««»«««««»»«»««»««««««# 



TST61I SCOPEl 



000432 



MOV 


«1252S2,%0 


ASH 


P(3)+,%0 


MFPS 


9#PSW0RD 


CMPB 


«10,9«PSMORD 


BEQ 


,♦10 


JSR 


PCSHLT 


36 




CMP 


#177525, %0 


BEQ 


.♦If 


JSR 


PCSHLT 


37 




CMP 


(RS),»61 


BNE 


IS 


INC 


(R5) 



iLOAO R0 WITH 125252 
iSHIFT R0 BY a(3)+ 
I SAVE PS 
|IS THE PS 10? 

iSEEN AN ERROR, GO TO TH HALT ROUTINE 
}THE PS IS NOT EQUAL TO 10 

lis THE RESULT 1775257 



iSEEN AN ERROR, GO TO TH HALT ROUTINE 

|R0 IS NOT EQUAL TO 177525 OR INCORRECT SEQUENCE 

lis 8TESTN 3 #61 
I IF NOT THEN GO TO HLT ABOVE 



I «■»•###»###»»»#*♦##«»*«•###»»♦*##♦##»####*#*♦*»♦»»»«»#»»##»»#♦#»•»•*#» 

|TEST|62 11/34 ASH 125252 SHIFTED BY 9-(3) = 177525 PS a 10 

I »#»#♦##»#*##*#«##»#»»#♦#»»•*#**#♦♦###»*#»#«#•»*♦»»*##«♦♦•♦»###***•«# 

TST62I 

iLOAD R0 WITH 125252 
iSHIFT R0 BY 9-(3) 
I SAVE PS 
lis THE PS 10? 

iSEEN AN ERROR, GO TO TH HALT ROUTINE 
jTHE PS IS NOT EQUAL TO 10 

lis THE RESULT 177525? 

iSEEN AN ERROR, GO TO TH HALT ROUTINE 
|R0 IS NOT EQUAL TO 177525 OR INCORRECT SEQUENCE 

lis STESTN s #62 
I IF NOT THEN GO TO HLT ABOVE 



SCOPEl 




MOV 


#125252, %0 


ASH 


9«(3),%0 


MFPS 


P#PSWORD 


CMPB 


ll0,9iPSWORO 


BEQ 


.♦10 


JSR 


PC,iHLT 


40 




CMP 


#177525, %0 


BEQ 


,♦10 


JSR 


PCSHLT 


41 




CMP 


(R5),#62 


BNE 


IS 


INC 


(R5) 
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1046 








1047 








1046 








1049 








1 0SO 








1 05 1 








1052 








1053 
















1 055 
















1 057 








1 058 


003442 


©12737 




1 059 


003 4S0 


005037 


000434 




^fgl 3 'w ij *t 


012737 






00346? 


003037 


IQVM} t W 


1 062 


Vw «f O O 




000442 


1 0fr 3 


«;01472 


1? 1 2 7 3 7 


000001 


1064 


il03S00 


1^05037 


000446 


1 065 








1066 


1^03504 


010703 




1 067 


003506 


01 0S02 




1068 


13035 1 


01 3700 


000434 


1 06 9 


110351 4 


31 3701 


000436 


1070 


003520 


00024 1 




1 1^7 1 


003522 


032737 


000001 




0035 30 


eta t acid 




1^73 




01 3705 


000440 


1 074 


003536 








^03540 


11 10 1 10 4( 




1076 


g03542 


07 3067 


174672 


! 




1 06737 


000432 


1 078 


003532 


123737 








{^0 1403 




1 «Bfl 


(^03562 


0SJ4767 


. , _ _ 










1082 


v% o 3 3 6^ 


u. ii a 01 d ? 




108 3 




C/05237 


0004 30 


108 4 


#03574 


023700 


000442 


1065 


^03600 


001 403 




1066 


U03602 


094767 


012632 


1097 










^03606 


90004 3 




1089 


^01610 


t»2370l 


000444 


1090 


g036l4 


^01403 




1091 








1092 


SJ03616 


004767 


012616 


1093 








1094 


^03622 


?)00e44 




1095 


f.03624 


010205 




1m96 


003626 


P21537 


000430 


1097 


S/01632 


^01403 




1098 


^03634 


904767 


012600 


1099 








1 100 
1101 


i;03640 
333642 


000045 
005215 





REG01t 



2$l 
4SI 



MOV 
CLR 
MOV 
CLR 
CLB 
MOV 
CLR 

SC0PE3 

MOV 

MOV 

MOV 

CLC 

BIT 

BNE 

MOV 

ASHC 

BB 

ASHC 

MFPS 

CMpB 

BEQ 

JSR 

42 

INC 

CMp 

BEQ 
JSR 

43 

CMP 

BEQ 

JSR 

44 

MOV 

CMP 

BEQ 

JSR 

45 
INC 



) ««»«»«*•«•«»«•«»»#«*#»«««««»«*•• 

J ASHC INSTRUCTION TESTS 



I »«»*«»*•«•«« 

ITEBTS 63«IS7 
I «•«»«««««•*» 



#62f e#COUNT 

g#TEMPl 

ll,ilTEMP2 

S#TEMB3 

e»TEMp4 

•1,»#TEMP5 

&#TEMP6 



f<5,R2 

©#TEMP1,%0 
@#TEMP2,%0|1 

#l,##SPftSS 
2$ 

e«TEMP3,R5 

R5,R0 

4$ 

TEMP3,%0 
iSPStaORD 



jTEMPls0 
JTEMP2B1 
;TEMP3s0 
yTEMP4a0 
;TEMP5»1 
j0 I SHIFTED BY 



It PSa 



}SAVE R5 

;PLACE THE CONTENTS Of TEMPi IN REGISTER 
iPLACE THE CONTENTS OF TEMP2 IN REGISTER I 

J IS IT AN EVEN PASS ? 
|ir NOT THEN GO TO 28 

jOTHERWiSE EXECUTE ASHC INSTRUCTION IN MODE 
;USING R0 



•ASHC REGISTER THE CONTENTS OF TEMP3 
fSAVE PS 

f »TEMp6,?i#pSW0RDjC0MpARE PS WITH THE CONTENTS OF TEMpfi 
1 + 10 

PC,$HLT ;SEEN AN ERROR, GO TO TH HALT ROUTINE 

|WRONG PS 



g#COUNT 
§»TEMP4,%0 
.♦10 
PC,SHLT 



©tTEMP5,%l 
,♦10 



PC,SHLT 



R2,R5 

(R5)f ACCOUNT 

.♦10 

PCSHLT 



;IS THE RESULT IN R0 SAME AS TEMP4? 

iSEEN AN ERROR, GO TO TH HALT ROUTINE 
yWRONG RESULT IN R0 

J IS THE RESULT IN PI SAME AS TEMPS? 
iTEMPi TEMP2 SHIFTED BY TEMP3bTEMP4 TEMP5 
;AND PSaTEMP6 

jSEEN AN ERROR, GO TO TH HALT ROUTINE 
yWRONG RESULT IN R| 

jRESTORE R5 

ylS TEST NUMBERaCOUNTER? 

jSEEN AN ERROR, GO TO TH HALT ROUTINE 
;N0 
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kCA.SRC 1 


8-N0V-.75 


00100 


02 


»fe3644 


021527 


000160 


03 


(i?03650 


002014 




04 


003652 


905237 


000440 


05 


0k)3656 


000241 




06 


003660 


006137 


000444 


07 


033664 


046137 


000442 


08 


i)33670 


021527 


000121 


09 


0.J3674 


001004 




10 


003676 


004467 


000410 


11 


W03702 


034767 


000440 


12 


^^W3706 


010731 




13 


i>037l0 


01 3702 


000434 


14 


&03714 


1)13703 


000436 


15 


003720 


000241 




16 


003722 


032737 


000001 


17 


»03730 


001004 




18 


003732 


013704 


000440 


19 


003736 


073204 




20 


003740 


000402 




21 


033742 


073267 


174472 


22 


e>03746 


106737 


000432 


23 


003752 


123737 


000446 


24 


003760 


001403 




25 


•303762 


004767 


012452 


26 








27 


00376t> 


1^00046 




28 


Pfc3770 


005237 


000430 


29 


003774 


023702 


000442 


30 


1^04000 


001403 




31 


004002 


004767 


012432 


32 








33 


004006 


000047 




34 


004010 


023703 


000444 


35 


004014 


901403 




36 








37 


004016 


004767 


012416 


38 








39 


004022 


000050 




4i) 


004024 


021537 


000430 


41 


#04030 


001403 




42 


004032 


004767 


012402 


43 








44 


004036 


000051 




45 


304040 


005215 




46 


2*04042 


071527 


000160 


47 


304046 


002014 




48 


004050 


005237 


000440 


49 


004054 


^00241 




50 


004056 


006137 


000444 


51 


004062 


006137 


000442 


152 


P04066 


021527 


000121 


53 


004072 


001004 




154 


004074 


004467 


000212 


55 


904100 


004767 


000242 


56 


004104 


010701 




157 


004106 


010501 
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ASHC INSTRUCTION TESTS 



6SS 

HEG23I 



2$l 
4$l 



6$| 

REG4S: 



CMP 


(P5),«160 


BGE 


6$ 


INC 


e#TEMp3 


CLC 




ROL 


?#TEMP5 


ROL 


9#TEMP4 


CMP 


tR5)»«12i 


BNE 


REG23 


JSR 


R4,BITSH 


JSR 


%7,TST160 


SCOPEl 




MOV 


9»TEMP1,%2 


MOV 


@»TEMP2,%211 


CLC 




BIT 


#1,(3#$PASS 


BNE 


2$ 


MOV 


e»TEMP3,R4 


ASHC 


R4,P2 


BR 


4$ 


ASHC 


TEMP3,%2 


MFPS 


i#PSWORD 


CMPB 


a#TEMP6,9#PSW0RD 


BEQ 


.♦10 


JSR 


PC,$HLT 


46 




INC 


&#count 


CMP 


g#TEMP4,%2 


BEQ 


. + 10 


JSR 


PC,SHLT 


47 




CMP 


9#TEMP5,%3 


BEQ 


, + l0 


JSR 


PC,$HLT 


50 




CMP 


CR5),(i8COUNT 


BEQ 


.♦10 


JSR 


PC,$HLT 


51 




INC 


(R5) 


CMP 


(R5)»«i60 


BGE 


6$ 


INC 


g#TEMP3 


CLC 




ROL 


#»TEMP5 


ROL 


P»TEMP4 


CMP 


(R5),#12l 


BNE 


REG45 


JSR 


R4,RITSH 


JSR 


%7,TST160 


SCOPEl 




MOV 


R5,R1 



jHAVE THE FIRST 159 TEST BEEN EXECUTED? 
;yES 



iROTATE TEMPS LEFT BY 1 PLACE 
J INTRODUCE CARRY FROM TEMP4 IN TEMP5 
•IS IT TEST 121? 

J IF SO THEN GO AND INITIATE RIGHT SHIFT 



jPLACE THE CONTENTS OF TEMPI IN REGISTER 2 
7PLACE THE CONTENTS OF TEMP2 IN REGISTER 3 

;IS IT AN EVEN PASS 7 
J IF NOT THEN GO TO 2S 

jOTHERWiSE EXECUTE ASHC INSTRUCTION IN MODE 
;USING R2 

jASHC REGISTER 2 BY THE CONTETNS OF TEMP3 
iSAVE PS 



;SEEN AN ERROR, GO TO TH HALT ROUTINE 
yWRONG PS 



;IS THE RESULT IN R2 SAME AS TEMP4? 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
;WRONG RESULT IN R2 

;IS THE RESULT IN R3 SAME AS TEMPS? 
yTEMPi TEMP2 SHIFTED BY TEMP3»TEMP4 TEMP5 
jAND PSBTEMP6 

{SEEN AN ERROR, GO TO TH HALT ROUTINE 
jWRONG RESULT IN Rl 

lis TEST NUMBERscOUNTeR? 

}SEEN AN ERROR, GO TO TH HALT ROUTINE 
J NO 



}HAVE THE FIRST 159 TEST BEEN EXECUTED? 
;YES 



I ROTATE TEMPS LEFT BY 1 PLACE 
I INTRODUCE CARRY FROM TEMPS IN TEMp4 
jlS IT TEST 1217 

;IF SO THEN GO AND INITIATE RIGHT SHIFT 
{SAVE RS 
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1158 


004110 


01 3704 


000434 






MOV 


p#TEMPl,%4 


1 1S9 


004114 


01 3705 


000436 






HOV 


0#TEMP2,%4H 


1 16i) 


©04120 


000241 








CLC 




1161 


004122 


032737 


000001 


000406 




BIT 


#1 , @#$PASS 


1162 


004 1 30 


001004 








BNE 


2S 


116 3 


004 132 


0l 3700 


000440 






MOV 


&#TEMP3,R0 


1164 


004 1 36 


07 3400 








ASHC 


R0f R4 


1165 


004140 


000402 








BR 


4S 


1 ! 66 


004142 


073467 


174272 




2St 


ASHC 


TEMP3,%4 


1167 


1^04 1 46 


1 06737 


000432 




4Sf 


MFPS 


P#PSMORD 


1166 


004 132 


123737 


000446 


000432 




CMPB 


9#TEMP6» 9#PSW0RD 


1169 


004 160 


001 403 








BEQ 


a + 10 


117 


004 162 


004767 


012252 






JSR 


PC,$HLT 


1171 
















1172 


Sv « t i V w 


0000S2 








52 




! ! ^ « 


004 170 


005237 








INC 


9#C0UnT 


11/4 


-1 la 










CMP 


9#TEMP4f %4 


1175 


00 4200 










BEQ 


a + 1 


1176 


004202 


004767 


012232 






JSR 


PC,SHLT 


I ! 
















1178 


004 206 










5 3 








023705 


00044 4 






CMP 


gi»TEMP5,%5 




0042 1 4 


00 1403 








BEQ 


»♦ 10 
















PC, SHLT 


1182 


a? W*f * 1 Q 


004767 


012216 






JSR 


1183 
















1184 


004222 


000054 








54 




1185 


J04224 


021137 


000430 






CMP 


(Rl),(a#C0UNT 


1186 


004230 


001403 








BEQ 


,♦10 


1187 


004232 


034767 


012202 






JSR 


PC,$HLT 


1188 
















1189 


(?04236 


900055 








55 




1 190 


004240 


010105 








MOV 


P1,R5 


1191 


{"04242 


005215 








INC 


(R5) 


1192 


004244 


021527 


000160 






CMP 


(R5)f #160 


1193 


£'04 250 


0020H 








BGE 


6$ 


i 194 


004252 


005237 


000440 






INC 


9#TEMp3 



;PLACE THE CONTENTS OF TEMPI IN REGISTER 4 
jPLACE THE CONTENTS OF TEMP2 IN REGISTER 5 

ylS IT AN EVEN PASS I 
J IF NOT THEN GO TO 2$ 

yOTHERWiSE EXECUTE ASHC INSTRUCTION IN MODE 
;USING R4 

jASHC REGISTER 4 BY THE CONTENTS OF TEMP3 
;SAVE PS 



jSEEN AN ERROR, GO TO TH HALT ROUTINE 
•WRONG PS 

J IS THE RESULT IN R4 SAME AS TEMP4I 

jSEEN AN ERROR, GO TO TH HALT ROUTINE 
;WRONG RESULT IN R4 

ylS THE RESULT IN R5 SAME AS TEMP57 
;TEMPi tEMP2 SHIFTED BY TEMP3bTEMP4 TEMPS 
jAND PSaTEMP6 

•SEEN AN ERROR, GO TO TH HALT ROUTINE 
;WRONG RESULT IN R5 

J IS TEST NUMBER=COUNTER? 

•SEEN AN ERROR, GO TO TH HALT ROUTINE 
:N0 



yRESTORE R5 



;HAVE THE FIRST 159 TEST BEEN EXECUTED? 
:YES 
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FKACA, 


,SRC : 


18-NOV-75 


00100 




ASHC INSTRUCTTO^ 


1 TESTS 


1195 


PS04256 


000241 








CLC 




1196 


C04260 


006137 


000444 






ROL 


e#TEMP5 


1197 


*J04264 


006137 


000442 






ROL 


&#TEMP4 


1198 


004270 


021527 


000121 






CMp 


(R5)»«121 


1199 


00427 4 


001004 








BNE 


8$ 


1200 


004276 


004467 


000010 






JSR 


R4,RITSH 


1201 


004302 


004767 


000040 




6$l 


JSR 


%7,TST160 


1202 


004306 


000167 


177172 




8$t 


JMP 


HEG01 


1203 


f04312 


022424 






RITSHf 


CMP 


(R4)+, (R4)+ 


1204 


004314 


012737 


040000 


000434 




MOV 


#40000, aSTEMPl 


1205 


004322 


005037 


000436 






CLR 


0»TEMP2 


1206 


004326 


012737 


177742 


000440 




MOV 


«-30.,9«TEMP3 


1207 


004334 


005037 


000442 






CLR 


##TEMP4 


1208 


004340 


005237 


000444 






INC 


@»TEMP5 


1209 


004344 


000204 








RTS 


R4 


1210 


004346 


021527 


000160 




TST160I 


CMP 


(R5)»»i60 


1211 


004352 


001010 








BNE 


TSTl6t 


1212 


004354 


005037 


000434 






CLR 


0#TFMP1 


1213 


1^04360 


005037 


000442 






CLR 


@i»TEMp4 


1214 


004364 


012737 


000004 


000446 




MOV 


#4,0#TEMP6 


1215 


004372 


000207 








RTS 


%7 


1216 


004374 


021527 


000161 




TSTI6I 1 


CMp 


(R5)»«161 


1217 


004400 


001004 








BNE 


TST162 


1218 


P04402 


012737 


177746 


000440 




MOV 


«»32# 0»TEMp3 


1219 


004410 


000207 








RTS 


%7 


1220 


004412 


021527 


000162 




TST162I 


CMP 


(R5),«162 


1221 


004416 


001004 








BNE 


TST163 


1222 


004420 


012737 


000032 


000440 




MOV 


S32#9«TEMP3 


1223 


004426 


000207 








RTS 


%7 


1224 


g>04430 


021527 


000163 




TST1631 


CMp 


(R5),#163 


1225 


004434 


001016 








BNE 


TST164 


1226 


004436 


012737 


052525 


000434 




MOV 


#5252'5f S#TEMPl 


1227 


004444 


012737 


177760 


000440 




MOV 


#-l6,,»#TEMP3 


1228 


004452 


005037 


000442 






CLR 


e»TEMP4 


1229 


004456 


012737 


052525 


000444 




MOV 


#52525»9#TEMP5 


1230 


004464 


005037 


000446 






CLR 


gSTEMPb 


1231 


004470 


000207 








RTS 


%7 


1232 


004472 


021527 


000164 




TST164I 


CMP 


(P5),»164 


1233 


004476 


001014 








BNE 


TST165 


1234 


004500 


012737 


125252 


000434 




MOV 


#125252#&»TEMPi 


1235 


004506 


005337 


000442 






DEC 


«a»TEMp4 


1236 


004512 


012737 


125252 


000444 




MOV 


#125252#0»TEMP5 


1237 


^04520 


012737 


000010 


000446 




MOV 


f 10,?#TEMP6 


1238 


1904526 


000207 








RTS 


%7 


1239 


004530 


021527 


000165 




TST165I 


CMP 


(R5),»165 


1240 


004534 


001007 








BNE 


TST166 


1241 


004536 


012737 


J77777 


000434 




MOV 


«'««l,9«TEMPi 


1242 


004S44 


012737 


177777 


000444 




MOV 


#»1,P#TEMP5 


1243 


004552 


000207 








RTS 


%7 


1244 


004554 


B21527 


000166 




TSTI66I 


CMP 


(R5)#H66 


1245 


004560 


001011 








BNE 


TST167 


1246 


004562 


012737 


100000 


000434 




HOV 


U00000,9»TEMP1 


1247 


004570 


012737 


177740 


000440 




MOV 


#-32.»iSTEMP3 


1248 


§04576 


00S237 


000446 






INC 


9#TEMP6 


1249 


004602 


000207 








RTS 


%7 


1250 


304604 


021527 


000167 




TST167I 


CMP 


(R5)f #167 



jROTATE TEMPS LEFT BY 1 PLACE 

; INTRODUCE CARRY FROM TEMP5 IN TEMP4 

,IS IT TEST 121? 

jIF SO THEN GO AND INITIATE RIGHT SHIFT 



•MAKE R4 POINT TO THE NEXT REG TAG 

JTEMP134000 

.TEMP2S0 

•TEHP3S-30 

;TEMP4a0 

jTEMPSbI 

jIS IT TEST 160 

•IF NOT THEN TRY TEST 161 

;0 SHIFTED BY 

•IS EQUAL TO 

;AND PSb4 

jIS IT TEST 161 

;0 SHIFTED BY -32=0 0r PSa4 

;IS IT TEST 162 

;IF NOT THEN TRY TEST 163 

y0 SHIFTED BY 32=0 0# PS=4 

jIS IT TEST 163? 

;IF NOT THEN TRY TEST 164 

;52525 

ySHIFTED BY -16, 

jIS EQUAL TO 52525 
•AND PS s 

jIS IT TEST 1647 

;IF NOT THEN TRY TEST 165 

1125252 SHIFTED BY «16, 

;IS EQUAL TO -1 125252 
jAND PSai0 

jIS IT TEST 165? 

ylF NOT THEN TRY TEST 166 

j-1 SHIFTED BY -16 

•IS EQUAL TO -1 -1, AND PSBI0 

;IS IT TEST 166? 

•IF NOT THEN TRY TEST 167 



jSHIFTED BY -32 IS EQUAL TO -1 «1 
jAND PSall 



lis IT TEST 167? 
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1251 


§04610 


001014 








BNE 


TST170 


|IF NOT THEN TRY TEST 


170 


1252 


004612 


005037 


000434 






CLR 


iSTEMPl 






1253 


^04616 


005337 


000436 






DEC 


@#TEMP2 


.0 «i 




1254 


004622 


012737 


000020 


000440 




MOV 


ll6.»a#TEMp3 


ySHIFTED BY 16, 




1255 


004630 


005037 


000444 






CLH 


§#TEMp5 


ylS EQUAL TO ■»! 




1256 


004634 


005237 


000446 






INC 


i#TEMP6 


jAND PS»12 




1257 


904640 


000207 








RT5 


%7 






1258 


^|04642 


021527 


000170 




TST170I 


CMP 


(R5)#»170 


jIS IT TEST 170? 




1259 


004646 


001007 








BNE 


TST171 


•IF NOT THEN TRY TEST 


171 


1260 


il04650 


012737 


125252 


000436 




MOV 


H25252#9««TEMP2 


|0 125252 SHIFTED BY 


16 


1261 


004656 


012737 


125252 


000442 




MOV 


#1252S2»9#TEMP4 


|IS EQUAL TO 125252 


, AND PS»12 


1262 


004664 


000207 








RTS 


%7 






1263 


#04666 


021527 


000171 




TST171 1 


CMP 


(R5)##171 


ylS IT TEST 171? 




126 4 


004672 


001010 








BNE 


TST172 


flf NOT THEN TRY TEST 


172 


1265 


004674 


005337 


000440 






DEC 


@»TEMP3 


;0 125252 SHIFTED BY 


15 


1266 


004700 


012737 


052525 


000442 




MOV 


f52525»9#TEMP4 


jIS EQUAL TO 52525 




1267 


004706 


005037 


000446 






CLR 


e#TEMp6 


;AND PS80 




1268 


904712 


000207 








RTS 


%7 






1269 


004714 


021527 


000172 




TST172I 


CMP 


CR53»»172 


jlS IT TEST 172? 




1270 


004720 


001006 








BNE 


TST173 


J IF NOT THEN TRY TEST 


173 


1271 


304722 


012737 


052525 


000436 




MOV 


#52525#a#TEMP2 


;0 52525 




1272 


P04730 


005237 


000440 






INC 


P»TEMP3 


^SHIFTED BY 16, IS EQUAL TO 52525 0# AND 


1273 


004734 


000207 








RTS 


%7 






1274 


#04736 


021527 


000173 




TST173I 


CMP 


(R5)#«173 


jIS IT TEST 173? 




1275 


004742 


001014 








BNE 


TST174 


;IF NOT THEN TRY TEST 


174 


1276 


004744 


012737 


177777 


000436 




MOV 


»«l,»«TEMP2 


;0 -1 




1277 


004752 


005337 


000440 






DEC 


0#TEMP3 


fSHIFTED BY 15, 




1278 


$904756 


012737 


077777 


000442 




MOV 


#77777f 0#TEMP4 






1279 


fi»04764 


012737 


100000 


000444 




MOV 


#100000»i#TEMP5 


;15 EQUAL TO 77777 10 


3000f AND PSS0 


1280 


004772 


000207 








RTS 


%7 






1281 


004774 


021527 


000174 




TST174I 


CMP 


(R5)r«174 


ylS IT TEST 174? 




1282 


005000 


001013 








BNE 


TST175 


J IF NOT THEN TRY TEST 


175 


1283 


005002 


012737 


100000 


000434 




MOV 


«100000#i»TEMPj 






1284 


005010 


005337 


000436 






DEC 


P#TEMP2 


J 100000 -2 SHIFTED BY 


15, 


1285 


005014 


005037 


000444 






CLR 


PiTEHpS 


jlS EQUAL TO 77777 




1286 


005020 


012737 


000002 


000446 




MOV 


#2»0#TEMP6 


;AND PSB2 




1287 


005026 


000207 








RTS 


%7 






1288 


005030 


021527 


000175 




TST1751 


CMP 


CR5)»«175 


;IS IT TEST l75? 




1289 


005034 


001015 








BNE 


ENT176 


;IF NOT THEN TRY TEST 


176 


129d 


005036 


012737 


177777 


000434 




MOV 


«-l»i«TEMPi 






1291 


005044 


005037 


000436 






CLR 


?»TEMP2 


;-l 




1292 


005050 


005237 


000440 






INC 


PSTEMP3 


jSHIFTED BY 16, 




1293 


005054 


005037 


000442 






CLR 


e«TEMp4 


;IS EQUAL TO 




1294 


005060 


012737 


000007 


000446 




MOV 


#7»?#TEMP6 


•AND PSs7 




1295 


005066 


000207 








RTS 


%7 






1296 


005070 


021527 


000176 




ENT176: 


CMP 


(R53f #176 


jlS THE PROGRM ENTERING TEST 176? 


1297 


005074 


001403 








BEQ 


, + 10 






1298 


005076 


004767 


011336 






JSR 


PC,8HLT 


•SEEN AN ERROR, GO TO 


TH HALT ROUTINE 


1299 
















yTEST NUMBER GOOFED 




1300 


005102 


000056 








56 








1301 




















1302 


1^05104 


&05726 








TST 


(SP) + 


;RESTORE STACK POINTER 
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304 
305 
306 
307 
308 
309 
310 
111 
312 
313 
314 
315 
316 
317 
318 
319 
320 
321 
322 
323 
324 
325 
326 
327 
328 
329 
330 
331 
332 
333 
334 
335 



?TESTtl76 1 SHIFTED BY 8, m 400 PS s 



005106 


010701 




TST176I SCOPEl 






005110 


012701 


000000 


MOV 


•DUMMY, %1 


;LOAD Rl WITH DUMMY 


005U4 


012701 


000001 


MOV 


tl#%l!l 


jLOAD Rill WITH I 


005120 


000241 




CLC 






005122 


B73127 


000010 


ASHC 


#8,,%i 


jSHIFT RlfRia BY 8, 


005126 


106737 


000432 


MFPS 


@#PSWORD 


iSAVE PS 


035132 


122737 


000000 i 


J00432 CMPB 


S0,@«PSWORD 


;IS THE PS 0? 


005140 


001403 




BEQ 


.4-10 




005142 


004767 


011272 


JSR 


PC,SHLT 


jSEEN AN ERROR, GO TO TH HALT 
;THE PS IS NOT EQUAL TO 


005146 


000057 




57 






^05150 


022701 


000400 


CMP 


#400f %1 


lis THE RESULT 400? 


005154 


001403 




BEQ 


, + 10 




005156 


004767 


011256 


JSR 


PC,$HLT 


;SEEN AN ERROR, GO TO TH HALT 
;R1 IS NOT EQUAL TO 400 


005162 


000060 




60 






005164 


021527 


000176 


CMP 


(R5)#8l76 


lis ITESTN ■ #176? 


905170 


001403 




BEQ 


, + 10 


J IF NOT THEN GO TO HLT 


005172 


004767 


01124,2 


JSR 


PC,8HLT 


;SEEN AN ERROR, GO TO TH HALT 










;TEST IS IN WRONG SEQUENCE 


005176 


000061 




61 






005200 


005215 




INC 


(R5) 





1336 


005202 


010701 




TST177I SCOPEl 




1337 


005204 


012703 


000000 


MOV 


#DUMMY,%3 


1338 


005210 


012703 


177777 


MOV 


»-l,t3ll 


1339 


il05214 


000241 




CLC 




1340 


005216 


p73327 


000017 


ASHC 


»15.,%3 


1341 


005222 


106737 


000432 


MFPS 


@»PSWORD 


1342 


005226 


122737 


000011 


00432 CMPB 


tll,9»PSW0RD 


1343 


905234 


001403 




BEQ 


. + 10 


1344 


005236 


004767 


011176 


JSR 


PC,$HLT 


1345 












1346 


005242 


000062 




62 




1347 


005244 


022703 


100000 


CMP 


9100000,13 


1348 


005250 


001403 




BEQ 


, + 10 


1349 


905252 


004767 


011162 


JSR 


PCIHLT 


1350 












1351 


005256 


000063 




63 




1352 


005260 


021527 


000177 


CMP 


(R5),#177 


1353 


905264 


001403 




BEQ 


t + 10 


1354 


005266 


004767 


011146 


JSR 


PC,$HLT 


1355 












1356 


005272 


900064 




64 




1357 


005274 


005215 




INC 


CR5) 



I ««««*«««»««««»««»»»«««««»«»#*««*««»««*»««««»«««»««««»««*«*#***«««**« 

|TEST|177 -1 SHIFTED BY 15, s 100000 PS a 11 

;»#####»«###»*»»♦»#»»♦*»♦»#*##»»####»#*♦###*####»##*»##»#*»♦»#*#»##»* 



|L0AD R3 WITH DUMMY 
jLOAD R3H WITH -I 



jSHIFT R3,R3U BY 15, 

jSAVE PS 

;IS THE PS 11? 

}SEEN AN ERROR, GO TO TH HALT ROUTINE 
|THE PS IS NOT EQUAL TO 11 

;XS THE RESULT 100000? 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
;R3 IS NOT EQUAL TO 100000 

lis 8TESTN a #1777 
J IF NOT THEN GO TO HLT 
}SEEN AN ERROR, GO TO TH HALT ROUTINE 
I TEST IS IN WRONG SEQUENCE 



358 
359 
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360 
361 
362 
363 



364 


00S276 


010701 




TST200I SCOPEl 




365 


005300 


010501 




MOV 




366 


005302 


01 2705 


000000 


MOV 


•DUMMY, 15 


367 


005306 


012705 


052525 


MOV 


l5252Sf %5I 1 


368 


005312 


000241 




CLC 




369 


§05314 


073527 


000000 


ASHC 


#0f%S 


370 


905320 


106737 


000432 


MFPS 


|l«PSWORD 


371 


^05324 


122737 


000000 000432 


CMPB 


V0r i*PSWORD 


372 


005332 


001403 




BEQ 


• ■i'10 


373 


005334 


004767 


011100 


JSR 


PC,SHLT 


374 












375 


005340 


000065 




65 




376 


id0S342 


022705 


052525 


CMP 


»52525»%5 


377 


005346 


001403 




BEO 


. + 10 


378 


005350 


004767 


011064 


JSR 


PC,$HLT 


379 












380 


005354 


000066 




66 




381 


905356 


010105 




MOV 


Ri,R5 


382 


§05360 


021527 


000200 


CMP 


(R5)M200 


383 


005364 


001403 




BEO 


."»-10 


384 


005366 


004767 


011046 


JSR 


PC,$HLT 


385 












386 


605372 


000067 




67 




387 


005374 


005215 




IHC 


CR5) 



388 
389 
390 
391 
392 
393 
394 
395 
396 
397 
398 
399 
400 
401 
402 
403 
404 
405 
406 
407 
408 
409 
410 
411 
412 
413 
414 
415 



I ••«»»•«««#«#»««»««««••«•»«««»•»«#««»»•«»«««••««*•»••«•»•*«»»•»««»•»« 

|TEST|200 5252S SHlfTED BY s S252S PS e 

}*«•••••»«»•*•»»»*»•«««•»««**»«»•«»•»«**•«»•««**«»*»•««••«««••**•«««» 



;SAVE R5 

|LOAD R5 WITH DUMMY 
{LOAD R511 WITH 52525 



005376 


010701 




TST201 1 SCOPEl 




(#05400 


012701 


000000 


MOV 


»DUMMYr%l 


005404 


012701 


020010 


MOV 


120010, %M1 


005410 


000241 




CLC 




005412 


073127 


177763 


ASHC 


»-13.,%l 


005416 


106737 


000432 


HFPS 


9IPSW0RD 


005422 


122737 


000000 000432 


CMPB 


»0,»«PSWORD 


005430 


001403 




BEO 


.♦10 


005432 


004767 


011002 


JSR 


PC,SHLT 


005436 


000070 




70 




M05440 


022701 


000101 


CMP 


•101«%1 


005444 


001403 




BEO 


.♦10 


005446 


004767 


010766 


JSR 


PC,$HLT 


005452 


000071 




71 




005454 


021527 


000201 


CMP 


(R5)»«20l 


005460 


001403 




BEO 


,♦10 


005462 


004767 


010752 


JSR 


PC,$HLT 


005466 


000072 




72 




005470 


005215 




IHC 


(R5) 



I SHIFT R5,R511 By 

I SAVE PS 

;IS THE PS 07 

iSEEN AN ERROR, GO TO TH HALT ROUTINE 
I THE PS IS NOT EQUAL TO 

lis THE RESULT 525257 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
;R5 IS NOT EQUAL TO 52525 

{RESTORE R5 

lis STESTN » #2007 
J IF NOT THEN GO TO HLT 
|SEEN AN ERROR, GO TO TH HALT ROUTINE 
|TEST IS IN WRONG SEQUENCE 



I •«»«•««•«»«»•«««**»«»«»«»««*»*«»*«««*«•»»*«•«*«#«*««•«»*••»*»•«•*««* 

|TEST|201 20010 SHIFTED BY -13, « 101 PS s 

I »»«••»»»•««»•»««»«««»«»*»•«*« «««««««»««•»««««•«»*«*•»»»«»«*#«****»«» 



•LOAD Rl WITH DUMMY 
•LOAD Rl U WITH 20010 

•SHIFT RlfRlll BY "13. 

I SAVE PS 

|IS THE PS 0? 

iSEEN AN ERROR, GO TO TH HALT ROUTINE 
|THE PS IS NOT EQUAL TO 

lis THE RESULT 101? 

I SEEN AN ERROR, GO TO TH HALT ROUTINE 
;R1 IS NOT EQUAL TO 101 

lis ITESTN a 1201? 

I IF NOT THEN GO TO HLT 

iSEEN AN ERROR, GO TO TH HALT ROUTINE 

iTEST IS IN WRONG SEQUENCE 
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1418 
1419 
1420 
1421 
1422 
1423 
1424 
1425 
1426 
1427 
1428 
1429 
1430 
1431 
1432 
1433 
1434 
1435 
1436 
1437 
1418 
1439 
1440 
1441 
1442 
1443 
1444 
1445 
1446 
1447 
1448 
1449 
1450 
1451 
14S2 
1453 
1454 
1455 
1456 
1457 
1458 
1459 
1460 
1461 
1462 
1463 
1464 
1465 
1466 
1467 
1468 
1469 
1470 
1471 
1472 
1473 



003472 


010701 




TS7202I 5C0PE1 




00S474 


012703 


000000 


MOV 


»DUMMy,%3 


®0SS00 


012703 


177777 


MOV 


l»l#%3ll 


005504 


000241 




CLC 




005306 


073327 


000020 


ASHC 


#16if %3 


00SS12 


106737 


000432 


NFPS 


@#PSWOPD 


003516 


J22737 


000011 000432 


CMPB 


»ll,ISPSWORD 


309524 


001403 




BEQ 


.♦10 


90SS26 


004767 


010706 


JSR 


PC,$HLT 


005332 


000073 




73 




003334 


022703 


000000 


CMP 


»0f%3 


005340 


001403 




BEQ 


,♦10 


005342 


004767 


010672 


JSP 


PC,$HLT 


305346 


000074 




74 




005S50 


p2l327 


000202 


CMP 


(R3}»#202 


00SSS4 


001403 




BEQ 


.♦10 


005536 


004767 


0106S6 


asp 


PC,8HLT 


003562 


000073 




75 




003564 


005215 




XNC 


(RS) 



|TE8T|a02 »l SHIFTED BY 16, s PS » U 



I LOAD R3 WITH DUMMY 
;LOAD R3I1 WITH »1 



005566 


010701 




TSf203t SCOPEl 




005570 


010501 




MOV 


R5,R1 


005372 


012705 


000000 


MOV 


•DUMMY»%5 


005576 


012705 


000001 


MOV 


*1»%5U 


005602 


000241 




etc 




005604 


073527 


177777 


ASHC 


«-li%5 


005610 


106737 


000432 


MFP8 


9IPSW0R0 


303614 


122737 


000001 £ 


»00432 CMPB 


•1,»|P8W0RD 


003622 


001403 




BEQ 


.♦10 


005624 


004767 


010610 


JSR 


PC,$HLT 


005630 


000076 




76 




005632 


022705 


100000 


CMP 


I100000#%5 


003636 


001403 




BEQ 


• ♦10 


903640 


004767 


010574 


JSR 


PCfSHLT 


005644 


000077 




77 




005646 


010105 




MOV 


Rl#R5 


003630 


021527 


000203 


CMP 


(R5)»«203 


005654 


001403 




BEQ 


,♦10 


005656 


004767 


010556 


JSR 


PC,«HLT 


005662 


000100 




100 




00S664 


005215 




INC 


(R5) 



I SHIFT R3«R3il BY 16, 

I SAVE PS 

|I8 THE PS 11? 

fSEEN AN ERRORf GO 70 TH HALT ROUTINE 
;THE PS IS NOT EQUAL TO 11 

lis THE RESULT 0? 

iSEEN AN ERRORi GO TO TH HALT ROUTINE 
;R3 IS NOT EQUAL TO 

IIS $TESTN a «202? 
I IF NOT THEN GO TO HLT 
iSEEN AN ERROR, GO TO TH HALT ROUTINE 
;TEST IS IN MRONG SEQU&NCE 



I *••*•*«*»««««»*«•«*«•*««»•»»»«•««»««•*««*••*«*«»«»»*«**#**«******««« 

|TESTi203 1 SHIFTED BY »1 a 100000 PS a 1 

I •**»«*#««« »««»»«»««*»«•••««*#•»«*«»»***•««•»«•#«*#«*«*«•««#«•#*•«•«* 



I SAVE RS 

|LOAD RS WITH DUMMY 
I LOAD R511 WITH | 

iSHIFT RSfRSIl BY -1 

I SAVE PS 

jIS THE PS II 

iSEEN AN ERROR, GO TO TH HALT ROUTINE 
|THE PS IS NOT EQUAL TO I 

lis THE RESULT 100000? 

{SEEN AN ERROR, GO TO TH HALT ROUTINE 
|R3 IS NOT EQUAL TO 100000 

I RESTORE RS 

lis $TESTN a »203? 
J IF NOT THEN GO TO HLT 
I SEEN AN ERROR, GO TO TH HALT ROUTINE 
iTEST IS IN WRONG SEQUENCE 
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1476 
1477 
1478 
1479 
14S0 
148i 
1482 
1483 
1484 
1485 
1486 
1487 
1488 
1489 
1490 
1491 
1492 
1493 
1494 
1495 
1496 
1497 
1498 
1499 
1500 
1501 
1502 
1503 
1504 
1505 
1506 
1507 
1508 
1509 
1510 
1511 
1512 
1513 
1514 
1515 
1516 
1517 
1518 
1519 
1520 
1521 
1522 
1523 
1524 
1525 
1526 
1527 
1528 
1529 
1530 
1531 



005666 


010701 




TST204I SCOPEl 




005670 


01 2701 


000000 


MOV 


#DUMMY»%1 


005674 


012701 


125252 


MOV 


#125252»%1 i 1 


005700 


000241 




CLC 




005702 


073127 


177760 


ASHC 


#'»16,,%1 


005706 


106737 


000432 


MFPS 


9#PSW0RD 


005712 


122737 


000011 000432 


CMPB 


»11,9#PSW0RD 


005720 


001403 




BEQ 


• •»'10 


005722 


004767 


010512 


JSR 


PC,$HLT 


005726 


000101 




101 




005730 


022701 


125252 


CMP 


«1252S2r%l 


005734 


001403 




BEQ 


,♦10 


005736 


004767 


010476 


JSR 


PCSHLT 


005742 


000102 




102 




005744 


021527 


000204 


CMP 


(R5)»#204 


005750 


001403 




BEQ 


, + 10 


©05752 


004767 


010462 


JSR 


PCfSHLT 


005756 


000103 




103 




005760 


005215 




IMC 


CR5) 



|TEST|204 125252 SHIFTED BY »16, a 125252 PS » 11 

I •**•««»««««««*««**«»»*«#«#»««*«*«#«»#*«««»««*****««•«««*•»*«*«*•***« 



jLOAD Rl WITH DUMMY 
jLOAD RUl WITH 125252 

jSHIFT Rl,RUl BY -16, 

jSAVE PS 

;IS THE PS 117 

{SEEN AN ERROR, GO TO TH HALT ROUTINE 
;THE PS IS NOT EQUAL TO 11 

lis THE RESULT 1252527 

jSEEN AN ERROR» GO TO IH HALT ROUTINE 
jRl IS NOT EQUAL TO 125252 

lis $TESTN 8 »204? 
I IF NOT THEN GO TO HLT 

•SEEN AN ERROR, GO TO TH HALT ROUTINE 
|TEST IS IN WRONG SEQUENCE 



125252 125252 SHIFTED BY 21. « 52500 000000 PS a 3 



|««»«««»«»«««» 
|TEST|205 
l*«#»«»»»»«»«» 



005762 


010701 




TST205I SCOPEl 




005764 


012702 


125252 


MOV 


#125252, %2 


005770 


012703 


125252 


MOV 


«12S2S2,%2il 


005774 


000241 




CLC 




005776 


073227 


000025 


ASHC 


»21.,%2 


006002 


106737 


000432 


MFPS 


i»#PSWORD 


006006/ 


122737 


000003 £ 


100432 CMpB 


#3,?#PSW0RD 


006014 


001403 




BEQ 


,♦10 


006016 


004767 


010416 


JSR 


PC, $ HLT 


006022 


000104 




104 




006024 


022702 


052500 


CMP 


S52500,%2 


006030 


001403 




BEQ 


. + 10 


006032 


004767 


010402 


JSR 


PC,SHLT 


006036 


600105 




105 




006040 


022703 


000000 


CMP 


#000000, %211 


006044 


001403 




BEQ 


,♦10 


006046 


004767 


010366 


JSR 


PC,$HLT 


006052 


000106 




106 




006054 


021527 


000205 


CMP 


(RS},i205 


006060 


001403 




BEQ 


, + 10 


006062 


004767 


010352 


JSR 


PCSHLT 



|LOAO R2 WITH 125252 
jLOAD R2il WITH 125252 

iSHIFT R2#R2il BY 21, 

iSAVE PS 

•IS THE PS 3? 

|SEEN AN ERROR, GO TO TH HALT ROUTINE 
I THE PS IS NOT EQUAL TO 3 

lis THE RESULT 52500? 

iSEEN AN ERROR, GO TO TH HALT ROUTINE 
|R2 IS NOT EQUAL TO 52500 

lis THE RESULT 000000? 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
|R2^1 IS NOT EQUAL TO 000000 

lis STESTN s #205? 
I IF NOT THEN GO TO HLT 
;SEEN AN ERROR, GO TO TH HALT ROUTINE 
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1532 
1533 
1534 
1535 
1536 
1537 
1538 
1539 
1540 
1541 



006066 000107 
006070 005215 



006072 012702 177771 
006076 012703 000454 
006102 012704 000456 



107 
INC 



MOV 
MOV 
MOV 



»-7,%2 
#S1,%3 
»S2,%4 



iTEST IS IN WRONG SEQUENCE 
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ASHC INSTRUCTION TESTS 



1542 








1543 








1544 








1545 








1546 




01 0701 




1547 


0061 10 


012700 


1 25252 


1548 


9061 1 4 


01 2701 


1 252S2 


1549 


aaft t 9u 

vvO i ft ^ 






1550 


006 122 


07 3067 


172326 


1551 


vvv k mO 


1 06737 


000432 


1552 




1 22737 




1553 




001 403 




1554 


9061 42 


004767 


010272 


1555 








1 556 








1557 




022700 


1 77525 


1558 


006154 


t^01 403 




1559 


S/I7U 2 SO 


004767 


010256 










1561 


006162 


0001 1 I 




1562 


V W w 1 o ^ 


022701 


052525 






001 403 




1 56 4 


§06172 






1 565 


0061 72 


004767 


010242 


1566 








1567 


i306 1 76 


0001 1 2 




1568 


006200 


021527 


000206 


1569 


006204 


001 3 72 








005215 












1572 








1573 








1574 
















1576 








1577 


0062 1 


01 070} 




1578 


0062 1 2 


^1 2700 


125252 


1 57*^ 


0062 1 6 




125252 






000241 








073077 


1 72226 


1582 


006 2 30 


1 067 37 


K7k7|9 t a / 




906 2 3 4 






1584 




00 1403 




1585 


006244 


004767 


010170 


1586 








1587 


t?06250 


000113 




1588 


006252 


022700 


177525 


1589 


306256 


001403 




1590 


006260 


004767 


0101S4 


1591 








1592 


006264 


000114 




1593 


006266 


022701 


052525 


1594 


006272 


001403 




1595 


006274 






1596 


W06271 


004767 


010140 


1597 









}««««»*»«»«»»»«»««•««««««»««««««»»»»«««»««««»««»»«««*•*«««*»«»»«»#»«« 

JTEST|206 12S252 125252 SHIFTED BY SI a 177525 52S25 PS s 10 

I «»«»«»»«»«««»«««»»«•»»«*»»«*««»**«»««««**««*«««•»««»#««*»«»*•*»**«*• 



ILOAD R0 WITH 125252 
;LOAD R0il WITH 12S2S2 



000432 







MOV 


•125252f %0 


MOV 


$125252r%0il 


CLC 




ASHC 


S1,%0 






rMDn 




BEQ 


■ + 10 


JSP 


PCf SHLT 


110 




CMP 


#177525, %0 


BEQ 


, + 10 


JSR 


PC, SHLT 


111 




CMP 


#52525#%0ll 


BEQ 


,♦10 


JSR 


PC, SHLT 


112 




CMP 


(R5),#206 


BNE 


IS 


INC 


(R5) 



jSHIFT R0,R0a By SI 

;SAVE PS 

;IS THE PS 107 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
;THE PS IS NOT EQUAli TO 10 

jIS THE RESULT 177525? 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
|R0 IS NOT EQUAL TO 177525 

;IS THE RESULT 52525? 



;SEEN AN ERROR, GO TO TH HALT ROUTINE 

;R0il IS NOT EQUAL TO 52525 OR INCORRECT SEQUENCE 



as THE STESTN » #206? 
J IF NOT THEN GO TO HLT ABOVE 



|TEST|207 125252 125252 SHIFTED BY 9S2 « 177525 52525 PS s 10 

; *»•»««•«»»»««»«««*««»«#«»»««**«*««»»*«««*««««**»«»««'«»»»««««»««««««« 



SCOPEl 






MOV 


#125252, %0 


jLOAD R0 WITH 125252 


MOV 


1125252, %011 


;LOAO R0I1 WITH 125252 


CLC 






ASHC 


tS2,%0 


jSHIFT R0,R0ll BY ?S2 


MFPS 


§«PSWORD 


;SAVE PS 


CMPB 


»10,»iPSWORD 


;IS THE PS 107 


BEQ 


,♦10 




JSR 


PC, SHLT 


iSEEN AN ERROR, GO TO TH HALT 






;THE PS IS NOT EQUAL TO 10 


113 






CMP 


#177525,10 


?IS THE RESULT 177525? 


BEQ 


,♦10 




JSR 


PC, SHLT 


iSEEN AN ERROR, GO TO TH HALT 






;R0 IS NOT EQUAL TO 177525 


114 






CMP 


#52525, %0J1 


;IS THE RESULT 52525? 


BEQ 


.♦10 




JSR 


PC, SHLT 


;SEEN AN ERROR, GO TO TH HALT 



;R0U IS NOT EQUAL TO 52525 OR INCORRECT SEQUENCE 
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1598 906300 000115 115 

1599 006302 021527 000207 CMP (R5),«207 jIS THE STESTN a #2077 

1600 006306 001372 BNE IS ;IF NOT THEN GO TO HLT ABOVE 

1601 006310 005215 INC (R5) 
1602 

1603 



DFKKA MAC¥il 3i>Ci046j 04»liUG"77 
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ASHC iNSfRUCTION TESTS 



1604 
160S 
1606 
1607 
1608 
1609 
1610 
1611 
1612 
1613 
1614 
1615 
1616 
1617 
1618 
1619 
1620 
1621 
1622 
1623 
1624 
1625 
1626 
1627 
1628 
1629 
1630 
1631 
1632 
1633 
1634 
1635 
1636 
1637 
1638 
1639 
1640 
1641 
1642 
1643 
1644 
1645 
1646 
1647 
1648 
1649 
16S0 
1651 
1652 
1653 
1654 
1655 
1656 
1657 
1658 
1659 



006312 
006314 
006 320 
006324 
006326 
006332 
006336 
006344 
^06346 

006352 
006354 
006360 
006362 

006366 
1106370 
006374 
006376 
006376 

006402 
006404 
006410 
006412 



010701 
012700 
012701 
000241 
073037 
106737 
122737 
001403 
004767 

000116 
022700 
001403 
004767 

00011 7 
022701 
001403 

004767 

000120 
021527 
001372 
005215 



I «•»»«*«•«•»•«»•#«»««•*»*•••«*«»••«*««««*•«•«•«**#*»••»*««#****««*««« 

|TE8T|210 125252 125252 SHIFTED B¥ flSl 8 177525 52525 PS s 10 

TST210I SCOPEl 



12S2S2 
12S2S2 

000454 
000432 
000010 

010066 



177525 
010052 

052525 

010036 

000210 



MOV 


9125252»%0 


iLOAD R0 M|TH 125252 


MOV 


«1252S2»%0{1 


iLOAD R0I1 VIXTH 125252 


CliC 






ASHC 


@«Slf%0 


jSHZFT R0fR011 BY @#Sl 


MFPS 


i«PSWORD 


iSAVE PS 


CMPB 


#10f iltPSWORD 


jlS THE PS 107 


BEQ 


.<'10 




JSR 


PCSHLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 






;THE PS IS NOT EQUAL TO 10 


116 






CMP 


#177525,10 


lis THE RESULT 1775251 


BEQ 


«4.10 




JSR 


PC,$HLT 


iSEEN AN ERROR, GO TO TH HALT ROUTINE 






jR0 IS NOT EQUAL TO 177525 


117 






CMP 


»52525#%0a 


?1S THE RESULT 52525? 


BEQ 






JSR 


PCf shlt 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 






;R0il IS NOT EQUAL TO 52525 OR INCORRECT 


120 






CMP 


(R5}#8210 


;IS THE $TESTN a #210? 


BNE 


1$ 


,IF NOT THEN GO TO HLT ABOVE 


INC 


(B5) 





;««»•««««*»«« «««»•« «»«»«««»»»*»»««*«*«•»«*«««•««#««»*««« 

?TESTi211 125252 125252 SHIFTED BY (3) = 177525 52525 PS s 10 

; »*»««#»•««»*««***#»«««»«««»««*«*»•*«*««*«»«»»*««*•««««»»«*««««»•«««» 



006414 


010701 




TST211I 


SCOPEl 








006416 


012700 


125252 




MOV 


#125252, %0 


ILOAO R0 MITH 125252 




006422 


012701 


125252 




MOV 


lfl2S252,%0tl 


jLOAD R0I1 WITH 125252 




li)06426 


000241 






CLC 








006430 


073013 






ASHC 


C3},%0 


ySHIFT R0,R0|1 BY C3) 




006432 


106737 


000432 




MFPS 


i#PSWORD 


;SAVE PS 




006436 


122737 


000010 e 


100432 


CMPB 


ll0,t»PSWORD 


J IS THE PS 10? 




006444 


001403 






BEQ 


.4-10 






006446 


004767 


007766 




JSR 


PC,8HLT 


•SEEN AN ERROR, GO TO TH HALT 


ROUTINE 












jTHE PS IS NOT EQUAL TO 10 




006452 


000121 






121 








006454 


022700 


177525 




CMP 


•177525, %0 


jIS THE RESULT 177525? 




006460 


001403 






BEQ 


,♦10 






906462 


004767 


007752 




JSR 


PC, SHLT 


fSEEN AN ERROR, GO TO TH HALT 


ROUTINE 












;R0 IS NOT EQUAL TO 177525 




006466 


000122 






122 








006470 


022701 


052525 




CMP 


#52525, %0a 


J IS THE RESULT 52525? 




006174 


001403 






BEQ 


. + 10 






006476 






ISl 










006476 


004767 


007736 




JSR 


PC, SHLT 


ySEEN AN ERROR, GO TO TH HALT 


ROUTINE 



;R0il IS NOT EQUAL TO 52525 OR INCORRECT SEQUENCE 
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1660 «'06502 000123 123 . 

1661 006504 021527 000211 CMP (R5),»2ll 7lS THE $TESTN s fill? 

1662 606510 001372 BNE 1$ ;IF NOT THEN GO TO HLT ABOVE 

1663 ^06512 005215 INC {R5) 
1664 

1665 
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1666 
1667 

166B 
1669 
1670 
1671 
1672 
1671 
1674 
1675 
1676 
1677 
1679 
1679 
1680 
1681 
1682 
1683 
1684 
168S 
1686 
1687 
1688 
1689 
1690 
1691 
1692 
1693 
1694 
1695 
1696 
1697 
1698 
1699 
1700 
1701 
1702 
1703 
1704 
1705 
1706 
1707 
1708 
1709 
1710 
1711 
1712 
1713 
1714 
1715 
1716 
1717 
1718 
1719 
1720 
1721 



006S14 010701 

006516 012700 1232S2 

006522 012701 1252S2 

II06S26 000241 

006530 073023 

g»06332 106737 000432 

^06536 122737 000010 000432 

006344 001403 

006546 004767 007666 

006552 000124 

906554 022700 177535 

006560 001403 

006S62 004767 007652 

006566 000125 

006570 022701 0S2S2S 

006574 001403 
006576 

006576 004767 007636 

006602 000126 

006604 021527 000212 

006610 001372 

006612 005215 



)*•*»•»•««••••*«*•«*«»«••»«»*«•»«*«••«*«**••*••«**««*••«*«•«•««•*«••« 

|TE8Tt2l2 125252 125252 SHIFTED S¥ (3J+ • 177525 52525 PS « 10 

I **#•###»####•»#♦»»#»#»«###»##»»**••♦««•♦♦♦♦*•*♦#»•♦*♦♦»•••♦•*♦*♦♦♦•• 

TST212I SCOPEl 



MOV 




• LOAD Rfl MTTH 1 9X91(9 


MOV 


#125252»%011 


{LOAD R0I1 WITH 125252 


CLC 






ASHC 


(3)4»t0 


; SHIFT R0#R0il By (3)+ 


MFPS 


ftPSWORD 


{SAVE PS 


CMPB 


»10ii«P3WORD 


lis THE PS 10? 


BEQ 


.♦10 


asR 


PCIHLT 


iSECN AN ERROR, GO TO TH HALT ROUTINE 






jTHE PS IS NOT EQUAL TO 10 


124 






CMP 


I17752S»%0 


;IS THE RESULT 1775257 


BEO 


, + 10 




JSR 


PCSHLT 


fSEEN AN ERROR, GO TO TH HALT ROUTINE 






;R0 IS NOT EQUAL TO 177525 


125 




CMP 


»52525#%0tl 


;IS THE RESULT 525257 


BSQ 


, + 10 




JSR 


pc»ihlt 


}SEEN AN ERROR* GO TO TH HALT ROUTINE 






|R0U IS NOT EQUAL TO 52525 OR INCORRECT 


126 






CMP 


(RS)f #212 


MS THE tTESTN « #2127 


BNE 


IS 


J IF NOT THEN GO TO HLT ABOVE 


INC 


(R5) 





;«»##»#•»»»»»#»*»#•»«#»#####««*####»»##*•#»•###•*»•»•*#•###»#»»»»**♦« 

|TEST|213 125253 125252 SHIFTED BY -(3) ■ 177525 52525 PS « 10 

;«•#*««•«»»#«»««««•«#»«#*•«»•««««»««**««»«*««»««««•*««»»*«'*•«**«**»*« 



006614 


010701 


TST213I 


SCOPEl 






i»066l6 


()12700 


125252 


MOV 


•125252, %0 


ILOAD R0 WITH 125252 


006622 


012701 


125252 


MOV 


1125252, %011 


jLOAD R011 WITH 125252 


006626 


000241 




CLC 




iSHIFT R0,R0il BY -(3) 


006630 


fcj73043 




ASHC 


-(3)»%0 


906632 


106737 


000432 


MFPS 


itPSWoRD 


jSAVE PS 


006636 


122737 


000010 000432 


CMpB 


I10,8IP8WORO 


;IS THE PS 10? 


006644 


001403 




BEQ 


, + 10 




006646 


004767 


007566 


JSR 


PCSHLT 


iSEEN AN ERROR, GO TO TH HALT 








;THE PS IS NOT EQUAL TO 10 


ft^06652 


000127 




127 




;IS THE RESULT 177525? 


006654 


022700 


177525 


CMP 


•177525,10 


006660 


001403 




BEQ 


,♦10 




006662 


1^04767 


007552 


JSR 


PC,SHLT 


;SeEN AN ERROR, GO TO TH HALT 
|R0 IS NOT EQUAL TO 177525 


006666 


000130 




130 




;IS THE RESULT 52525? 


006670 


022701 


052525 


CMP 


»52525f%0ll 


P06674 


001403 




BEQ 


, + l0 




P06676 












P06676 


004767 


007536 


JSR 


PCSHLT 


;SEEN AN ERROR* GO TO TH HALT 



;R0(1 IS NOT EQUAL TO 52525 OR INCORRECT SEQUENCE 
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1722 006702 000131 131 

1723 006704 021527 000213 CMP (R5),»213 |IS THE STESTN ■ 12137 

1724 006710 001372 BNE IS jIF NOT THEN GO TO HLT ABOVE 

1725 006712 005215 INC (R5) 
1726 

1727 
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1728 
1729 
1730 
1731 



1732 




a! olaa 










1733 


0067 1 o 


t ti * 


1 25252 








1734 


006722 


012701 


125252 




MOV 




1735 


&av ' AW 


000241 






CLC 




1736 


006730 


073064 






ASHC 


2 C 4 ) f %0 


1737 


0067 34 


1 06737 


000432 




MFPS 




17 38 


006 740 


1 22737 






CMPB 




17 39 




00 1 403 






BEQ 


e + 10 


1740 


006750 


004767 


007464 




JSR 


PC» $HLT 


1741 














1742 


006754 


000132 






132 




1743 


006756 


022700 


177252 




CMP 


#177252, %0 


1744 


006762 


001403 






BEQ 


,♦10 


174S 


006764 


004767 


007450 




JSR 


PC,SHLT 


1746 














1747 


006770 


000133 






133 




1748 


006772 


022701 


125252 




CMP 


«125252#%0U 


1749 


006776 


001403 






BEQ 


,♦10 


1750 


007000 












1751 


007000 


004767 


007434 




JSR 


pcshlt 


1752 














1753 


007004 


000134 






134 




1754 


007006 


021527 


000214 




CMP 


CR5)»#214 


1755 


007012 


001372 






BNE 


1$ 


1756 


007014 


005215 






INC 


CR5) 



1757 
1758 
1759 
1760 
1761 
1762 



;TEST|214 125252 125252 SHIFTED B¥ 2(4) s 177252 125232 PS a U 



fLOAO R0 WITH 125252 
;LOAO R0a WITH 125252 

jSHIFT R0,R0|1 BY 2(4) 

;SAVE PS 

|IS THE PS 117 

I SEEN AN ERRORi GO TO TH HALT ROUTINE 
jTHE PS IS NOT EOUAL TO 1 1 

jIS THE RESULT 1772527 

ySEEN AN ERROR, GO TO TH HALT ROUTINE 
|R0 IS NOT EQUAL TO 177252 

?IS THE RESULT 125252? 

ySEEN AN ERROR, GO To TH HALT ROUTINE 

;R0{1 IS NOT EQUAL TO 125252 OR INCORRECT SEQUENCE 

;IS THE $TESTN = 12147 

ylF NOT THEN GO TO HLT ABOVE 



}**««»«««««»»««««««««»»•«»*««««**«««*«*««»*«««»«»«««»«««««*«»««««««»« 

|TEST|215 125252 125252 SHIFTED BY 0(4) * 177525 52525 PS a 10 

; »*««»«»«»«»»««««««»»««»«««««««»»«««*«««»«««»««*»«««*««««««»»«««*»««« 



1763 


007016 


010701 




TST215I 


SCOPEl 






1764 


007020 


012703 


125252 




MOV 


•125252, %0 


jLOAD R0 WITH 125252 


1765 


007024 


012701 


125252 




MOV 


#125252, %0n 


yLOAD R011 WITH 125252 


1766 


007030 


000241 






CLC 






1767 


007032 


073074 


000000 




ASHC 


9(4), %0 


ySHIFT R0,R0ll BY «(4) 


1768 


007036 


106737 


000432 




HFPS 


@«PSiMORD 


ySAVE PS 


1769 


607042 


122737 


000010 e 


)00432 


CMPB 


« 10,9#PSWORD 


jlS THE PS 10? 


1770 


007050 


001403 






BEQ 


,♦10 




1771 


007052 


004767 


007362 




JSR 


PC,SHLT 


iSEEN AN ERROR, GO TO TH HALT 


1772 














jTHE PS IS NOT EQUAL TO 10 


1773 


007056 


000135 






US 






1774 


^07060 


022700 


177525 




CMP 


#177525, %0 


jIS THE RESULT 1775257 


1775 


007064 


001403 






BEQ 


,♦10 




1776 


007066 


004767 


007346 




JSR 


PCSHLT 


;SEEN AN ERROR, GO TO TH HALT 


1777 














jR0 IS NOT EQUAL TO 177525 


1778 


007072 


000136 






136 






1779 


907074 


022701 


052525 




CMP 


#52525, %0!l 


;IS THE RESULT 52525? 


1780 


907100 


001403 






BEQ 


,♦10 




1781 


007102 






ISi 








1782 


007102 


004767 


007332 




JSR 


PCSHLT 


jSEEN AN ERROR, GO TO TH HALT 



911 IS NOT EQUAL TO 52525 OR INCORRECT SEQUENCE 
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1784 007106 000137 137 

1785 g«071l0 021527 000215 CMP (R5),»215 sIS THE $XESTN = #215? 

1786 007114 001372 BNE 18 ;IF NOT THEN GO TO HLT ABOVE 

1787 007116 005215 INC (RS) 
1788 

1789 
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1790 








1791 








1792 








1793 








1794 


007120 


010701 




1795 


907122 


B12700 


125252 


1796 


007126 


01 2701 


125252 


1797 


007132 


000241 




1798 


007134 


073034 




1799 


1507136 


106737 


000432 


1800 


307142 


122737 


000010 


1801 


007150 


001403 




1802 


007152 


004767 


007262 


1803 
1804 


607156 


000140 




1805 


007160 


022700 


177525 


1806 


007164 


001403 




1807 


007166 


004767 


007246 


1808 
1809 


007172 


000141 




1810 


007174 


022701 


052525 


1811 


037200 


001403 




1812 


907202 






1813 


007202 


004767 


007232 


1814 








1815 


007206 


000142 




1816 


007210 


021527 


000216 


1817 


?507214 


001372 




1818 


C07216 


005215 




1819 








1820 








1821 








1822 








1823 








1824 








1825 


007220 


010701 




1«26 


007222 


012700 


125252 


1827 


007226 


012701 


125252 


1828 


007232 


000241 




1829 


007234 


073054 




1830 


B07236 


106737 


000432 


1831 


007242 


122737 


000010 


1832 


007250 


001403 




1833 


007252 


004767 


007162 


1834 








1835 


«?07256 


000143 




1836 


007260 


022700 


177525 


1837 


007264 


001403 




1838 


007266 


004767 


007146 


1839 








1840 


007272 


000144 




1841 


007274 


B22701 


052525 


1842 


007300 


001403 




1843 


007302 






1844 


007302 


004767 


007132 


1845 









;TEST|216 125252 125252 SHIFTED BY 0(4)+ a 177525 52525 PS ■ 10 

} #»»»##»###«««♦»♦♦*##♦«»#»«#«*#*##«»####»«*«»»*##♦#»###»###»#»#«##### 

TST216I SCOPEl 



MOV 


#125252r%0 


jLOAD R0 WITH 125252 


MOV 


#125252f%0|l 


jLOAD R0H WITH 125252 


CLC 






ASHC 


f (4)*,%0 


jSHIFT R0,R0|l BY iC4)+ 


MFPS 


i»PSWORD 


jSAVE PS 


CMPB 


#10,gi#PSWORD 


ylS THE PS 10? 


BEQ 


,4-10 




JSR 


PCf SHLT 


fSCiCin AN C.RKUK, Q\J lU Xn HALiX KUUTinCi 






jTHE PS IS NOT EQUAli TO 10 


140 
CMP 


8177525, %0 


;IS THE RESULT 177525? 


BEQ 


, + 10 




JSR 


PC, SHLT 


•SEEN AN ERROR, GO TO TH HALT ROUTINE 






;R0 IS NOT EQUAL TO 177525 


141 






CMP 


#52525, %0il 


J IS THE RESULT 52525? 


BEQ 


, + 10 




JSR 


pcshlt 


jSEEN AN ERROR, GO TO TH HALT ROUTINE 






;R0I1 IS NOT EQUAL TO 52525 OR INCORRECT 


142 






CMP 


<R5),»216 


; IS THE $TESTN = #216? 


BNE 


18 


J IF NOT THEN GO TO HLT ABOVE 


INC 


CR5) 





}•««#«««»««»*«»*««««•««««»«*»«**«*«»««*»»«««»«««»«««*««»«*•«*•*«*«««« 

|TEST|217 125252 125252 SHIFTED BY ?-(4) s 177525 52525 PS « 10 

;»«»*#»««»«••««»« *«»»»«»»#«»»««#**«*««»»««*«««»«##«»«»««**««««#««»»«'» 

TST217I SCOPEl 
MOV 



000432 



HOV 

CLC 

ASHC 

MFPS 

CMPB 

BEQ 

JSR 

143 

CMP 
BEQ 
JSR 

144 

CMP 

BEQ 



#125252, %0 
#125252,1011 

i-C4),%0 

i#PSWORD 

#10,i#PSWORD 

,♦10 

PCSHLT 



•177525, %0 

, + 10 
PC,8HLT 



#52525, %0ll 
, + 10 



PCSHLT 



iLOAD R0 WITH 125252 
•LOAD R0H, WITH 125252 

, SHIFT R0,R0li BY §»C4) 

;SAVE PS 

;IS THE PS 10? 

;S£EN AN ERROR, GO TO TH HALT ROUTINE 
;THE PS IS NOT EQUAL TO 10 

;IS THE RESULT 177525? 

jSEEN AN ERROR, GO TO TH HALT ROUTINE 
;R0 IS NOT EQUAL TO 177525 

;IS THE RESULT 52525? 



;SEEN AN ERROR, GO TO TH HALT ROUTINE 

;R0!1 IS NOT EQUAL TO 52525 OR INCORRECT SEQUENCE 
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1846 
1847 
1848 
1849 
1850 
1851 
1852 
1853 
1854 
1855 
1856 
1857 
1858 



(107306 000145 

007310 021527 000217 

007314 001372 

007316 005215 



145 
CMP 
BNE 
INC 



(R5),«217 
IS 

(R5) 



lis THE 8TESTN a #217? 
;IF NOT THEN GO TO HLT ABOVE 



WMCh MACYU 30C1046J 04«AUG«77 i4|09 PhOE 46 

)FKACA,SRC 18«NOV«7S 00100 HUL INSfRUClION TESTS 



1 8S9 








S 860 








1661 








1862 








1 663 
















1 66S 








1 666 








1667 
















1669 








1670 


007320 


01 0701 




! nli 




01 2700 




1872 


007326 


f If TIT 




1873 


007 332 






1874 


007336 


122737 




1875 


007 344 


0l9| 40 j 




1876 


007346 


004767 


007066 


1877 








1878 


0073S2 


0001 46 




1879 


0073S4 


022700 


000000 


1880 


007 360 


WIS 1 »0 J 




1881 


007362 


004767 


007052 


1862 












0001 47 




1884 


007370 


022701 


000000 


1883 


5107374 


001403 




1886 


007376 






1887 


007376 


004767 


007036 


1888 
1889 


007402 


000150 




1890 


007404 


021S27 


000220 


1891 




001372 




1892 


007412 


00S215 




1893 








1894 









I HUL INSTRUCTION TESTS 



}TESTi220 MUli 1 ^ #0 s PS s 4 



TST220I SCOPE 



000432 



MOV 


«1,%0 


mi 


#0,%0 


MFPS 


i#PSWORD 


CMPB 


#4,»»PSW0PD 


BEQ 


,♦10 


JSR 


PC,SHliT 


146 




CMP 


»0f%0 


BEQ 


9*10 


JSR 


PC,$HLT 


147 




CMP 


80#%0!1 


BEQ 




JSR 


PCfSHLT 


150 




CMP 


(R5}»«220 


BNE 


1$ 


INC 


(R5) 



;LOAD MULTIPLICAND WITH I 
^MULTIPLY I « #0 
iSAVE PS 
J IS PS s 4 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
•PS IS WRONG 

lis HIGH ORDER « 

ISEEN AN ERROR, GO TO TH HALT ROUTINE 
jHIGH ORDER IS WRONG 

;IS LOW ORDER a 



;Se;EN an ERRORf GO TO TH HALT ROUTINE 
;LOW ORDER IS WRONG OR WRONG SEQUENCE 



;IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 



FKRCA 


MACYli 


30(1046) 


04«AUG-77 14109 PAGE 


47 






rKACA, 


,SRC 1 


8*N0V»75 


00100 MUL INSTRUCTION 


TESTS 




1895 






;♦»♦#♦»#»#•#«»»###»»»######»#««*###»»##«*###»♦#»#*#♦»#*##»•*»•#»###*» 


1896 






jTESTi221 


MUL -1 * 


#1 s »l »1 PS « 10 


1897 








1898 














1699 


C907414 


010701 


TST221 1 


SCOPE 






1900 


007416 


012700 


177777 


MOV 


#«1,%0 


sLOAO MULTIPLICAND WITH «1 


1901 


007422 


070027 


000001 


MUL 


«1,%0 


jMULTIPLY »1 * #1 


1902 


W07426 


106737 


000432 


MFPS 


PtPSWORD 


;SAVE PS 


1903 


007432 


122737 


000010 000^32 


CMPB 


»10,§»PSWORD 


;I8 PS a 10 


1904 


007440 


001403 




BEQ 


. + 10 




1905 


007442 


004767 


006772 


JSR 


PC,|HLT 


•SEEN AH ERROR, GO TO TH HALT ROUTINE 


1906 












;PS IS WRONG 


1907 


007446 


000151 




151 






1908 


007450 


022700 


177777 


CMP 


S-l,%0 


;IS HIGH ORDER a <>l 


1909 


007454 


001403 




BEQ 


, + 10 




1910 


007456 


004767 


006756 


JSR 


PCSHLT 


jSEEN AN ERROR, GO TO TH HALT ROUTINE 


1911 












;HIGH ORDER IS WRONG 


1912 


007 462 


000152 




152 






1913 


007464 


022701 


177777 


CMP 


lf-l#%0i 1 


;IS LOW ORDER » -I 


1914 


007470 


001403 




BEQ 


9 + 10 




1915 


007472 




l$l 








1916 


007472 


004767 


006742 


JSR 


PC#9HLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


1917 












;LOW ORDER IS WRONG OR WRONG SEQUENCE 


1918 


007476 


000153 




153 






1919 


007500 


021527 


000221 


CMP 


CR5)»»22l 




1920 


007504 


001372 




BNE 


1$ 


J IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 


1921 


007506 


005215 




INC 


CR5) 




1922 














1923 
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) 



1924 
1925 
1926 
1927 



1928 


P07510 


010701 




TST222I 


SCOPE 




1929 


007512 


012702 


000002 




MOV 


12, %2 


1930 


007516 


B70227 


000002 




MUL 


#2,%2 


1931 


f07522 


106737 


000432 




MFPS 


itpswoRD 


1932 


@07S26 


122737 


000000 £ 


)00432 


CMPB 


»0f SiPSWOPO 


1933 


007534 


001403 






BEQ 


,♦10 


1934 


'307536 


004767 


006676 




JSR 


PC,SHLl 


1935 














1936 


iS07S42 


000154 






154 




1937 


007S44 


022702 


000000 




CMP 


#0»%2 


1936 


007550 


001403 






BEQ 


,*10 


1939 


037552 


004767 


006662 




JSR 


PC,|HLT 


1940 














1941 


007556 


000155 






155 




1942 


007560 


022703 


000004 




CMP 


»4,%2I1 


1943 


007564 


001403 






BEQ 


9*10 


1944 


007566 






13S 






1945 


&J07566 


004767 


006646 




JSP 


PC#8HLT 


1946 














1947 


007572 


000156 






156 




1948 


1307574 


021527 


000222 




CMP 


(R5)f «222 


1949 


007600 


001372 






BNE 


1$ 


1950 


007602 


005215 






INC 


(R5) 



|TEST|222 MUL 2»#2 804 PSa0 



;LOAO MULTIPLICAND WITH 2 

jMULTIPLY 2 » #2 
7 SAVE PS 
;IS PS 8 



ySEEN AN ERROR, GO TO TH HALT ROUTINE 
;PS IS WRONG 

J IS HIGH ORDER a 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
•HIGH ORDER IS WRONG 

J IS LOW ORDER s 4 

fSEEN AN ERROR, GO TO TH HALT ROUTINE 
;LOW ORDER IS WRONG OR WRONG SEQUENCE 

;IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 



1951 
1952 
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1953 








1954 








1955 








1956 








1957 


007604 


010701 




1958 


007606 


010501 




1959 


007610 


012704 


001000 


1960 


007614 


070427 


000200 


1961 


007620 


106737 


000432 


1962 


^#07624 


122737 


030001 


1963 


007632 


001403 




1964 


007634 


P0 4767 


006600 


1965 








1966 


007640 


000157 




1967 


007642 


022704 


000001 


1968 


007646 


001403 




1969 


K»07650 


004767 


006564 


1970 








1971 


007654 


000160 




1972 


007656 


022705 


000000 


1973 


007662 


001403 




1974 


<J07664 






1975 


007664 


004767 


006550 


1976 








1977 


307670 


000161 




1978 


©07672 


021127 


000223 


1979 


007676 


001372 




1980 


007700 


010105 




1981 


607702 


005215 




1982 
1983 
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J «»•»•««««»««»««»«»«*•««#»»*»«*»«*»««*»*»«««««««»**««••»*»»««*«««««*« 

JTEST|223 MUL 100k) # #200 ■ 1 PS s 1 



TST223I SCOPE 



MOV 


R5,R1 


MOV 


#1000, %4 


MUL 


1200, %4 


MFPS 


ftPSWORD 


CMpB 


#l,a#PSWORD 


BEQ 


.♦10 


JSR 


PC,$HLT 


157 




CMP 


#1,%4 


BEQ 


.♦10 


JSR 


PCSHLT 


160 




CMP 


»0,%4!1 


BEQ 


,♦10 


JSR 


PC,$HLT 


161 




CMP 


(Rn,«223 


BNE 


1$ 


MOV 


R1,R5 


INC 


(R5) 



;SAVE RS 

;LOAD MULTIPLICAND WITH 1000 
yMULTIPLX 1000 » »200 
jSAVE PS 
;IS PS s 1 

J SEEN AN ERROR, GO 10 TH HALT ROUTINE 
;PS IS WRONG 

;IS HIGH ORDER a I 

jSEEN AN ERROR, GO TO TH HALT ROUTINE 
;HIGH ORDER IS WRONG 

;IS LOW ORDER b 



;SEEN AN ERROR, GO TO TH HALT ROUTINE 
;LOW ORDER IS WRONG OR WRONG SEQUENCE 

ICHECK THE TEST NUMBER 
•IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 
J RESTORE R5 



I 
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1984 








1985 








1986 








1987 


007704 












1 ono 




012700 








070027 




1 99 1 


007716 






1992 


&V 1 1 id 


1 227 3/ 


000001 


1993 


007730 


001 403 






8077 32 


004767 




1995 








1 996 


007736 


000162 






1*07740 


022700 


000000 




007744 


001 403 




1999 


007746 


004767 


006466 


2000 








2001 


WW 1 lad 


000163 




2002 


007754 


022701 


177776 


2003 


i>07760 


001403 




2004 


007762 






2005 


(507762 


004767 


006452 


2006 








2007 


007766 


000164 




2008 


007770 


021S27 


000224 


2009 


007774 


001372 




2010 


007776 


005215 




2011 








2012 









|TEST|224 MUL 2 » #77777 a 177776 PS a 1 



jLOAD MULTIPLICAND WITH 2 
jMULTIPLY 2 » #77777 
;SAVE PS 
;IS PS s 1 

jSEEN AN ERROR, GO TO TH HALT ROUTINE 
yPS IS WRONG 

J IS HIGH ORDER = 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
yHIGH ORDER IS WRONG 



SCOPE 




MOV 


#2,%0 


MUL 


#77777, %0 


MFPS 


§»PSW0RD 




9 1, e>ff PBWUKu 


BEQ 


e + 1 


JSR 


PC, SHLT 


162 




CMP 


S0,%0 


BEQ 


9 + 10 


JSR 


PC,$HLT 


163 




CMP 


#177776, %0| 


BEQ 


9 + 10 


JSR 


pc,$hlt 


164 




CMP 


(R5),«224 


BNE 


IS 


INC 


{R5) 



jIS LOW ORDER a 177776 



ySEEN AN ERROR, GO TO TH HALT ROUTINE 
;LOW ORDER IS WRONG OR WRONG SEQUENCE 



;IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 
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;*»«««»«««»««»*»«»«»*»«»»«»»««««#««»«»*»«»«*«»««»*«»«««»«*«#»««««««#« 



2014 








|TEST|225 


MUL 7777 


* #10 a 77770 PS s 


2015 
2016 










2017 


010000 


010701 




TST225I SCOPE 






2018 


010002 


012702 


007777 


MOV 


#7777, %2 


;LOAO MULTIPLICAND WITH 7777 


2019 


i?10006 


070227 


000010 


MUL 


#10, %2 


jWULTIPLY 7777 * #10 


2020 


010012 


106737 


000432 


MFPS 


9#PSW0RD 


;SAVE PS 


2021 


010016 


122737 


000000 C 


)00432 CMPB 


»0,9#PSWORD 


;IS PS » 


2022 


010024 


001403 




BEQ 


9 + 10 




2023 


010026 


004767 


006406 


JSR 


PC,$HLT 


ySEEN AN ERROR, GO TO TH HALT ROUTINE 


2024 












;PS IS WRONG 


2025 


^10032 


000165 




165 






2026 


010034 


022702 


000000 


CMP 


#0,%2 


;IS HIGH ORDER = 


2027 


010040 


001403 




BEQ 


.♦10 




2028 


010042 


004767 


006372 


JSR 


PC, SHLT 


ySEEN AN ERROR, GO TO TH HALT ROUTINE 


2029 












;HIGH ORDER IS WRONG 


2030 


010046 


000166 




166 






2031 


010050 


022703 


077770 


CMP 


177770, %2ll 


;IS LOW ORDER «= 77770 


2032 


910054 


001403 




BEQ 


B + 10 




2033 


010056 






l$l 






2034 


010056 


004767 


006356 


JSR 


PC, SHLT 


jSEEN AN ERROR, GO TO TH HALT ROUTINE 


2035 












•LOW ORDER IS WRONG OR WRONG SEQUENCE 


2036 


910062 


000167 




167 






2037 


010064 


021527 


000225 


CMP 


(R5),»225 




2038 


010070 


001372 




BNE 


IS 


J IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 


2039 


010072 


005215 




INC 


(R5) 





2040 
2041 
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2042 








2043 








2044 








2043 








2046 


010074 


010701 




2047 


910076 


010501 




2048 


010100 


01 2704 


077777 


2049 


i910l04 


B70427 


077777 


2050 


0101 10 


106737 


000432 


2051 


010114 


1 22737 


000001 


2052 


310122 


1*01403 




2053 


010124 


004767 


006310 


2054 








2055 


01 01 30 


0001 70 




2056 


k>101 32 


022704 


037777 


2057 


0101 36 


001403 




2058 


67101 40 


004767 


006274 


2059 








2060 


010144 


000171 




206t 


010146 


b22705 


000001 


2062 


fe$10152 


001403 




2063 


1^10154 






2064 


li>10154 


004767 


006260 


2065 








2066 


010160 


000172 




2067 


010162 


021127 


000226 


2068 


010166 


001372 




2069 


310170 


010105 




2070 


010172 


4105215 




2071 








2072 









}TESTi226 MUL 77777 # #77777 s 37777 1 PS ® I 



TST2261 SCOPE 
HOV 
MOV 
MUL 
MFPS 
CMPB 
BEQ 
JSR 

170 
CMP 
BEQ 
JSR 

171 

CMP 
BEQ 

l$t 

JSR 

172 
CMP 
BNE 
MOV 
INC 



R5,B1 

#77777, %4 

#77777, %4 

§#PSWORD 

»l,9#e5W0RD 

,♦10 

PC,$HLT 



#37777, %4 

9 + 10 

PC,3HLT 



#1,%411 

s + 10 



pcshlt 



(Bl),#226 
1$ 

B1,R5 
CR5) 



ISAVE B5 

;LOAD MULTIPLICAND WITH 77777 
•MULTIPLY 77777 » #77777 
J SAVE PS 
jlS PS a 1 

ySEEN AN ERROR, GO TO TH HALT ROUTINE 
;PS IS WRONG 

;IS HIGH ORDER » 37777 

•SEEN AN ERROR, GO TO TH HALT ROUTINE 
;HIGH ORDER IS WRONG 

JIS LOW ORDER B J 



ySEEN AN ERROR, GO TO TH HALT ROUTINE 
•LOW ORDER IS WRONG OR WRONG SEQUENCE 

JCHECK THE TEST NUMBER 
•IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 
•RESTORE R5 
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207 3 






;««•««»«»««««»»«»»«*»«*»«»««•«*«««««««««*«««#««*»»««««««*«»»»**««*«*« 


2074 






|TEST|227 


MUL -1 * 


#77777 a -l 100001 PS a 10 


2075 














2076 














2077 


010174 


010701 


TST227I 


SCOPE 






2078 


010176 


012702 


177777 


MOV 


#-l,%2 


jLOAD MULTIPLICAND WITH «1 
jMULTIPLY =1 « #77777 


2079 


(H0202 


070227 


077777 


MUL 


#77777, %2 


2080 


P10206 


J06737 


000432 


MFPS 


i#PSWORD 


J SAVE PS 


2081 


010212 


122737 


000010 000432 


CMPB 


#10,9#PSWORD 


;IS PS 3 10 


2082 


010220 


D01403 




BEQ 


a + 10 




2083 


010222 


P04767 


006212 


JSR 


PC,$HLT 


ySEEN AN ERROR, GO TO TH HALT ROUTINE 


2084 












;PS IS WRONG 


2085 


;<»10226 


000173 




173 






2086 


210230 


022702 


177777 


CMP 


»»1,%2 


;IS HIGH ORDER a "1 


2087 


010234 


001403 




BEQ 


. + 10 




2088 


»10236 


004767 


006176 


JSR 


PCSHLT 


•SEEN AN ERROR, GO TO TH HALT ROUTINE 


2089 












;HIGH ORDER IS WRONG 


2090 


'^10242 


000174 




174 






2091 


010244 


&22703 


100001 


CMP 


#100001, %2|1 


;IS LOW ORDF.R a 10000t 


2092 


ii»10250 


001403 




BEQ 


,♦10 




2093 


$>102S2 




161 








2094 


ei0252 


004767 


006162 


JSR 


pc,shlt 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


2095 












;LOW ORDER IS WRONG Op WRONG SEQUENCE 


2096 


010256 


000175 




175 






2097 


$»10260 


B21527 


000227 


CMP 


(R5),»227 




2098 


010264 


001372 




BNE 


1$ 


ylF IN WRONG SEQUENCE GO TO THE HLT ABOVE 


2099 


^^10266 


005215 




INC 


(R5) 




2100 














2101 
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3102 








2103 








2104 








210S 








2106 


B10270 


010701 




2107 


010272 


012700 


177776 


2108 


©10276 


070027 


077777 


2109 


^10302 


106737 


000432 


2110 


010306 


122737 


000011 


2111 


010314 


001403 




2112 


010316 


004767 


006116 


2113 








21H 


010322 


000176 




2115 


g*!0324 


022700 


177777 


2116 


U10330 


001403 




2117 


010332 


004767 


006102 


2118 








2119 


^^10336 


000177 




212« 


1^10340 


022701 


000002 


2121 


5*10344 


001403 




2122 


i;l0346 






2123 


g?103l6 


004767 


006066 


2124 








2125 


S510352 


000200 




2126 


P10354 


021527 


000230 


2127 


P10360 


001372 




2128 


010362 


00521S 




2129 








2130 









|TEST|230 MUL «2 » #77777 a -I 2 PS e li 



;LOAD MULTIPLICAND WITH -2 
jMULTIPLX -2 ♦ #77777 
;SAVE PS 
;IS PS a 11 



SCOPE 




MOV 


••2»%0 


HUL 


#77777»%0 


MFPS 


»f PSWORD 


CHPB 


• UfVfPSWORD 


BEQ 


.♦10 


JSP 


PC,SHLT 


176 




CMP 


#«l,%0 


BEQ 


.♦10 


JSR 


PC,$HLT 


177 




CMP 


I2,%0U 


BEQ 


,♦10 


JSR 


pc,ihlt 


200 




CMP 


(R5}« »230 


BNE 


1$ 


INC 


CR5) 



;SEEN AN ERROR* GO TO TH HALT ROUTINE 
;P8 IS WRONG 

lis HIGH ORDER ■ -1 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
;HIGH ORDER IS WRONG 

; IS LOW ORDER • 2 

;SEEN AN ERROR* GO TO TH HALT ROUTINE 
;LOW ORDER IS WRONG OR WRONG SEQUENCE 

;1F IN WRONG SEQUENCE GO TO THE HLT ABOVE 
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2131 








2132 








2133 








2134 








2135 


f 10364 


010701 




2136 


010366 


012702 


J25252 


2137 


010372 


070227 


000002 


2138 


010376 


106737 


000432 


2139 


010402 


122737 


000011 


21 40 


01041W 


001 403 




2141 


B10412 


004767 


006022 


2142 








2143 


C10416 


030201 




2144 


010420 


022702 


177777 


2145 


010424 


001403 




2146 


010426 


004767 


006006 


2147 








2148 


010432 


000202 




2149 


010434 


022703 


052524 


2150 


£510440 


001403 




2151 


010442 






2152 


010442 


004767 


005772 


2153 








2154 


P10446 


000203 




2155 


910450 


021527 


000231 


2156 


010454 


001372 




2157 


010456 


005215 




2158 








2159 









;«*###»##♦#♦#»»♦#♦»##♦#♦#»#«»»#♦#»#»#####*#»#«#»#»#######»»»»#»»»##»# 
?TESTi231 MUL 125252 » »2 ■ -1 52524 PS « 11 

;«««««««»»««*»»«««»««•«*»«*«*«*««*«« »«»««»»«*«*«»««««»»««««*«»««*«««• 



;LOAD MULTIPLICAND WITH 125252 
;«ULTIPLY 125252 * #2 
;SAVE PS 
;IS PS s u 



SCOPE 




MOV 


«125252f %2 


MUL 


12, %2 


MFPS 


PtPSWORD 


CMPB 


«ll,i«PSWORD 


BEQ 


.♦10 


JSR 


PC,SHLT 


201 




CMP 


#»1#%2 


BEQ 


.♦10 


JSR 


PC,$HLT 


202 




CMP 


«52524,%2ll 


BEQ 


, + l0 


JSR 


PCSHLT 


203 




CMP 


(R5),«231 


BNE 


1$ 


INC 


(R5) 



jSEEN AN ERROR, GO TO TH HALT ROUTINE 
;PS IS WRONG 



jIS HIGH ORDER a -1 



•SEEN AN ERROR, GO TO TH HALT ROUTINE 
;HIGH ORDER IS WRONG 



;IS LOW ORDER » 52524 



jSEEN AN ERROR, GO TO TH HALT ROUTINE 
•LOW ORDER IS WRONG OR WRONG SEQUENCE 



jIF IN WRONG SEQUENCE GO TO THE HLT ABOVE 
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2160 
2161 
2162 
2163 



2164 


010460 


010701 




TST232I 


SCOPE 




2165 


310462 


010501 






MOV 


R5,R1 


2166 


010464 


012704 


1252S2 




MOV 


«12S2S2#%4 


2167 


S10470 


070427 


040000 




MUL 


«40000f %4 


2168 


010474 


106737 


000432 




MFPS 


»#PSWORD 


2169 


010300 


122737 


000011 000432 




CMPB 


#U#i«PSWORD 


2170 


§10506 


001403 






BEO 


,♦10 


2171 


010510 


004767 


00S724 




JSR 


PCtHLT 


2172 














2173 


010SH 


000204 






204 




2174 


010516 


022704 


1632S2 




CMP 


»16S2S2f%4 


2175 


310522 


001403 






BEQ 




2176 


010524 


004767 


005710 




JSR 


PCfSHLT 


2177 














2178 


010530 


000205 






205 




2179 


010532 


022705 


1 00000 




CMP 


«100000f%4}l 


2180 


010536 


001403 






BEQ 


,4'10 


2181 


010540 






ISI 






2182 


010540 


004767 


005674 




JSR 


PC#SHl,T 


2183 














2184 


010544 


000206 






206 




2185 


010546 


02U27 


000232 




CMP 


(RU»«232 


2186 


010552 


001372 






BNE 


H 


2187 


0105S4 


010105 






MOV 


R1#RS 


2188 


010556 


005215 






INC 


CR5) 



I «••«•*•«••••*«*»•••••««••#«*••»•»«»•«••««•«»*#•«•#•*»#••*•*«•««•«**« 

|TEST|232 MUL 129252 # 140000 8 165253 100000 PS a U 

I »•»•«««•#•»««««««»»•««»•»»«•»«»•«««*«**«««»•»««**»«•*»»•**««»«•«•*«« 



I SAVE RS 

|LOAD MULTIPLICAND WITH 129252 

{MULTIPLY 125292 « 940000 
I SAVE PS 
I IS PS m 11 

I SEEN AN ERROR; GO TO TH HALT ROUTINE 
|PS IS WRONG 

;IS HIGH ORDER a 1652S2 

;SEEN AN ERROR* GO TO TH HALT ROUTINE 
|HI6H ORDER IS NrONG 

;IS LOW ORDER « 100000 



;SEEN AN ERROR* GO TO TH HALT ROUTINE 
;LOW ORDER IS WRONG OR WRONG SEQUENCE 

ICHECK THE TEST NUMBER 
;ir IN WRONG SEQUENCE GO TO THE HLT ABOVE 
I RESTORE RS 



2189 
2190 
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2191 










2192 








|TESTi233 


MUL 107070 


» 1107070 m 31222 26100 PS m % 


2193 
2194 
2195 










010560 


010701 




TST233I SCOPE 






2196 


SJ10562 


012700 


107070 


MOV 


#107070»%0 


;LOAD MULTIPLICAND WITH 107070 


2197 


((^10566 


070027 


107070 


MUL 


I107070»%0 


|MULTIPLY 107070 « #107070 


2198 


310572 


106737 


000432 


MFPS 


PftPSWORD 


;SAVE PS 


2199 


010576 


122737 


000001 0S 


J0432 CMPB 


Sl,i#PSWORD 


J IS PS B 1 


1200 


fil0604 


001403 




BEQ 


,♦10 




,201 


010606 


004767 


005626 


JSR 


PC, $ HLT 


;SEEN AN ERROR* GO TO TH HALT ROUTINE 


2202 












;PS IS WRONG 


2203 


010612 


000207 




207 




2204 


010614 


022700 


031222 


CMP 


I31222*%0 


;IS HIGH ORDER s 31222 


2205 


010620 


001403 




BEQ 


,♦10 




2206 


010622 


004767 


005612 


JSR 


PC,8HLT 


;SEEN AN ERROR* GO TO TH HALT ROUTINE 


2207 












jHIGH ORDER IS WRONG 


2208 


010626 


000210 




210 






2209 


010630 


022701 


026100 


CMP 


#261001 %0I1 


;IS LOW ORDER b 26100 


2210 


010634 


001403 




BEQ 


, + 10 




2211 


010636 






ISS 






2212 


010636 


004767 


005576 


JSR 


PCfSHLT 


7 SEEN AN ERROR* GO TO TH HALT ROUTINE 


2213 












}LOW ORDER IS WRONG OR WRONG SEQUENCE 


2214 


010642 


000211 




211 






2215 


010644 


021527 


0002331 


CMP 


(RS},»233 




2216 


010650 


001372 




BNE 


1$ 


;IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 


2217 
2218 
2219 


010652 


005215 




INC 


(R5) 
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2220 








3231 








2222 








2223 








2224 




010701 




2225 


010656 


01 2701 


177777 


2226 


010662 


070127 


000001 


2227 


010666 


1 06737 


000432 


2228 


010672 


1 22737 


000010 


2229 


£110700 


001 403 




2230 




004767 


005532 


2231 








2232 


010706 


000212 




2233 


01 07 1 


022701 


177777 


2234 


0107 1 4 


001 403 




2235 


I910716 


004767 


005516 










2237 


010722 


000213 




2238 


010724 


022701 


177777 


2239 


010730 


001403 




2240 


010732 






2241 


010732 


004767 


005502 


2242 








2243 


010736 


000214 




2244 


010740 


021527 


000234 


2245 


010744 


001372 




2246 


010746 


005215 




2247 








2248 









)*«*«««««««***»««*«««•*««»««*«»«*»#««•«««»*»»««»««««»*»«««««*««««#*#« 

|TEST|234 MUL -I » #1 s «l «1 PS b 10 



TST234I SCOPE 



000432 



MOV 


#-l»%l 


MUL 


»1»%1 


MFPS 


e#PSWORD 


CHPB 


«10#8'«PSWORD 


BCQ 


a + 10 


JSR 


PCSHLT 


212 




CMP 


#-l#%l 


BEQ 


, + 10 


JSR 


PC,$HLT 


213 




CMP 


»-l#%lil 


BEQ 


, + 10 


JSR 


pc#shlt 


214 




CMP 


(R5)»#234 


BNE 


1$ 


INC 


CR5) 



jLOAD MULTIPLICAND WITH -1 
lMULTIPL¥ -l « #1 
jSAVE PS 
;IS PS B 10 

;SEEN AN ERROR* GO TO TH HALT ROUTINE 
;PS IS WRONG 

;IS HIGH ORDER b «| 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
jHIGH ORDER IS WRONG 

lis LOW ORDER 8 -1 



jSEEN AN ERROR# GO TO TH HALT ROUTINE 
;LOW ORDER IS WRONG OR WRONG SEQUENCE 



;IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 
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2249 
2250 
2251 
2252 

2253 010750 

2254 010752 

2255 010756 

2256 010762 

2257 010766 

2258 010774 

2259 010776 
2260 

2261 011002 

2262 011004 

2263 011010 

2264 011012 
2265 

2266 mteie 

2267 011020 
2266 011024 

2269 011026 

2270 011026 
2271 

2272 011032 

2273 011034 

2274 011040 

2275 011042 
2276 

2277 
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;*##««««««*«»»«»«»•»»»««««»«««*««««««•»««»«««»*«»•«»««#»«««»««««»«»«« 

fTESTt235 MUL »l « #0 b PS s 4 



010701 

012703 177777 
070327 000000 
106737 000432 
122737 000004 000432 
001403 

004767 005436 
000215 

022703 000000 
001403 

004767 005422 
000216 

022703 000000 
001403 

004767 005406 
000217 

021527 000235 

001372 

005215 



T5T235I SCOPE 
MOV 
HUL 
MFPS 
CMPB 
BEQ 
JSR 

215 
CMP 
BEQ 
JSR 

216 
CMP 

BEQ 

18i 

JSR 

217 
CMP 
BNE 
INC 



««lf%3 

«0,%3 

e#PSWORD 

»4,9»PSH0RD 

. + 10 

PC,SHLT 



#0,%3 
. + 10 
PCSHLT 



#0#%3!1 
. + 10 



pc#$hlt 



(R5),«235 
1$ 

(R5) 



;L0A0 MULTIPLICAND WITH «1 
^MULTIPLY -1 * #0 
;SAVE PS 
;IS PS 8 4 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
|PS IS WRONG 

J IS HIGH ORDER a 

iSEEN AN ERROR, GO TO TH HALT ROUTINE 
;HIGH ORDER IS WRONG 

;IS LOW ORDER » 



jSEEN AN ERROR, GO TO TH HALT ROUTINE 
^;LOW ORDER IS WRONG OR WRONG SEQUENCE 



•IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 
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2278 








2279 








2280 








2281 








2282 


011044 


010701 




2283 


011046 


010501 




2284 


01 1050 


012705 


077777 


228S 


011054 


070527 


100000 


2286 


01 1060 


1 06737 


000432 


2287 


01 1064 


172737 


00001 1 


2288 


01 1072 


001 403 




2289 


@t 1 074 


004767 


005340 


2290 








2291 


01 1 100 


000220 




2292 


£?1 1 102 


022705 


100000 


2293 


01 1 106 


001403 




2294 


011110 


004767 


005324 


2295 








2296 


011114 


000221 




2297 


011116 


022705 


100000 


2298 


011122 


001403 




2299 


011124 






2300 


011124 


004767 


005310 


2301 








2302 


eill30 


000222 




2303 


91U32 


021127 


000236 


2304 


011136 


001372 




2305 


011140 


010105 




2306 


011142 


005215 




2307 








2308 









|TEST|236 
TST236I SCOPE 



MUii 77777 « #100000 s 100000 100000 PS a n 

«#»♦#»»##»#«»»**##«###»##♦#»###*#*#*#»»##«»#♦»«»#»*** 



I SAVE RS 

jLOAD MULTIPLICAND WITH 77777 
jHULTIPLY 77777 # #100000 
;SAVE PS 
;IS PS B 11 



MOV 


R5,R1 


MOV 


177777, %5 


MUL 


# 100000* %5 


MFPS 


@#PSWORD 


CMPB 


S 1 1 . @tt.PSWORD 


BEQ 


, + 10 


JSR 


PCIHLT 


220 




CMP 


8100000#%S 


BEQ 


.♦10 


JSR 


PC,$HLT 


221 




CMP 


#100000f %5|1 


BEQ 


,♦10 


JSR 


PCSHLT 


222 




CMP 


CRn#»236 


BNE 


18 


MOV 


Rl#R5 


INC 


(R5) 



;SE£N AN ERROR, GO TO TH HALT ROUTINE 
;PS IS WRONG 

;IS HIGH ORDER a 1 



;SEEN AN ERROR, GO TO TH HALT ROUTINE 
;HIGH ORDER IS WRONG 



;IS LOW ORDER a i 



J SEEN AN ERROR, GO TO TH HALT ROUTINE 
;LOW ORDER IS WRONG OR WRONG SEQUENCE 

ICHECK THE TEST NUMBER 
ylF IN WRONG SEQUENCE GO TO THE HLT ABOVE 
jRESTORE R5 
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2309 








2310 








2311 








2312 








2313 


011144 


010701 




2314 


1511146 


012701 


177777 


2315 


011152 


070127 


077777 


2316 


JJIU56 


106737 


000432 


2317 


011162 


J22737 


000010 


2318 


011)70 


001403 




2319 


011172 


g»04767 


005242 


2320 








2321 


011176 


900223 




2322 


fe>11200 


622701 


100001 


2323 


in 1204 


001403 




2324 


&11206 


004767 


005226 


2325 








2326 


011212 


lc»00224 




2327 


f^U2l4 


022701 


100001 


2328 


011220 


001403 




2329 


&11222 






233k) 


011222 


004767 


005212 


2331 








2332 


011226 


000225 




2333 


011230 


021527 


000237 


2334 


011234 


001372 




2335 


&11236 


005215 




2336 








2337 









|TESTt237 MUL -1 * »77777 a 100001 100001 PS ■ 10 

TST237I SCOPE 



MOV 


»-l,%1 


|LOAD MULTIPLICAND WITH -1 


MUL 


#77777,%! 


jMULTIPLY -1 » #77777 


MFPS 


@«PSWORD 


;SAVE PS 


CMPB 


*10,9»PSWORD 


jIS PS B 10 


BEQ 


.♦10 




JSR 


PC,8HLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 






;PS IS WRONG 


223 






CMP 


»100001,%1 


;IS HIGH ORDER a 100001 


BEQ 


,♦10 




JSR 


PC,$HLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 






;HIGH ORDER IS WRONG 


224 






CMP 


#100001, %lil 


;IS LOW ORDER m 100001 


BEQ 


.♦10 




JSR 


PC,$HLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 






;LOW ORDER IS WRONG OR WRONG SEQUENCE 


225 






CMP 


(R5),«237 




BNE 


1$ 


;IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 


INC 


(R5) 
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2339 
2339 
2340 
2341 



2342 








TST340 1 


SCOPE 






§11 242 


012703 


077777 




MOV 


177777, %3 






070327 


077777 




MUL 


#77777,13 




@1 1232 


1 067 37 






MFPS 


@#PSWORD 


2346 


^11256 


122737 






CHpB 


i 1 . iiSSWORD 


2347 


691 1 264 


001 403 






BEQ 


i'^10 


2348 


§1 1266 


004767 


003146 




JSR 


PCylHLT 


2349 














2350 


011272 


000226 






226 




2331 


^11274 


022703 


000001 




CMP 


#lf%3 


2332 


011300 


001403 






BEQ 


,♦10 


2353 


011302 


004767 


00S132 




JSP 


PC,|HLT 


2354 














2355 


011306 


000227 






227 




2356 


0U310 


022703 


000001 




CMP 


•1*%311 


2357 


&U314 


001403 






BEQ 


. + 10 


2358 


011316 






l$t 






2359 


011316 


004767 


005116 




JSR 


PCIHLT 


2360 














2361 


011322 


00023id 






230 




2362 


911324 


021527 


000240 




CMP 


(R5),«240 


2 363 


011330 


001372 






BNE 


1$ 


2364 


311332 


0B5215 






INC 


(R5) 



»TEST|240 MUL 77777 « #77777 all PS « I 



;LOAD MULTIPLICAND WITH 77777 
, MULTIPLY 77777 # #77777 
;SAVE PS 
lis PS a 1 



fSEEN AN ERRORr GO TO TH HALT ROUTINE 
;PS IS WRONG 

lis HIGH ORDER s 1 

}SEEN AN ERROR, GO TO TH HALT ROUTINE 
;HIGH ORDER IS WRONG 

jIS LOW ORDER a I 



|SEEN AN ERROR, GO TO tH HALT ROUTINE 
;LOW ORDER IS WRONG OR WRONG SEQUENCE 



I IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 



2365 
2366 
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2367 










2368 










2369 










237fe* 










2371 


011334 


010701 






2372 


(^11336 


010501 






2373 


011340 


ft>12705 


000002 




2374 


611344 


070527 


000002 




2375 


011350 


106737 


000432 




2376 


011354 


122737 


000000 m 


J0432 


2377 


011362 


001403 






2378 


!aU364 


004767 


005050 




2379 










2380 


011370 


000231 






2381 


011372 


022705 


000004 




2382 


011376 


001403 






2383 


011400 


004767 


005034 




2384 










2385 


011404 


000232 






2386 


011406 


022705 


000004 




2387 


011412 


C01403 






2388 


011414 








2389 


©11414 


004767 


005020 




2390 










2391 


011420 


000233 






2392 


k»11422 


021127 


000241 




2393 


©11426 


001372 






2394 


011430 


010105 






2395 


011432 


005215 






2396 










2397 
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|TESTl24i MUL 2 • «2 s 4 4 PS a 

;«»»#»####•##***«♦*#»♦##«»#»*♦♦♦♦*»•»♦#♦«#»»•#*#*♦#♦»•«»•♦»»♦•»♦♦♦♦** 

TST241I SCOPE 

ySAVE R5 

;tOAD MULTIPLICAND WITH 2 
^MULTIPLY 2 » #2 
;SAVE PS 
I IS PS a 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
I PS IS WRONG 

lis HIGH ORDER n 4 

iSEEN AN ERROR, GO TO TH HALT ROUTINE 
iHIGH ORDER IS WRONG 

lis LOW ORDER B 4 



MOV 


B5,R1 


MOV 


»2,%5 


MUL 


«2,%5 


MFPS 


§»PSWORD 


CMPB 


«0,9»PSWORD 


BEQ 


. + 10 


JSR 


PC, $ HLT 


231 




CMP 


14, %5 


BEQ 


, + 10 


JSR 


PC,$HLT 


232 




CMP 


»4,%5il 


BEQ 


, + 10 


JSR 


pcshlt 


233 




CMP 


(Rl),»241 


BNE 


H 


MOV 


H1,R5 


INC 


(R5) 



ySEEN AN ERROR, GO TO TH HALT ROUTINE 
|LOW ORDER IS WRONG OR WRONG SEQUENCE 

ICHECK THE TEST NUMBER 
;IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 
jRESTORE R5 
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2390 


f 11434 


012702 


040000 


2399 


@U440 


013703 


000464 


2400 


0U444 


012704 


000466 


2401 








2402 








24io3 








2404 








240S 








2406 


011490 


010701 




2407 


0U452 


012700 


125252 


2400 


3U4S6 


070067 


167002 


2409 


0U462 


106737 


000432 


2410 


011466 


122737 


000011 


2411 


011474 


001403 




2412 


0U476 


004767 


004736 


2413 








2414 


0U502 


000234 




2415 


0US04 


022700 


165252 


2416 


011510 


001403 




2417 


011512 


004767 


004722 


2410 








2419 


^11516 


000235 




2420 


^11520 


022701 


100000 


2421 


011524 


001403 




2422 


(711526 






2423 


011526 


004767 


004706 


2424 








2425 


»11532 


000236 




2426 


0U534 


021527 


000242 


2427 


011340 


001372 




2428 


011542 


005215 




2429 








2430 









MOV 
HOV 
MOV 



•40000f %2 

•S5r%3 

*S6»%4 



I «••*»•«««»«»»««««»«»«*•«••»«»•«»*»«•«««»«•««»««•*«**«•**•»*««««**«•* 
|TEST|242 MUL 125252 « S5 ■ 165252 100000 PS ■ 11 

I «•«««•«»««*««*«*•»««»*•*»««•«««•»**•*«*•#«*•«****•«#«««••«»**»•«•#•'» 

TST242I SCOPE 



MOV 


81252S2r%0 


iLOAD MULTIPLICAND WITH 125252 


HUL 


S5,%0 ' 


, MULTIPLY 125252 ♦ S5 


MFPS 


ispswoRo 


iSAVE PS 


CMPB 


>llr»#PSWORO 


|IS PS a 11 


BEQ 


.*10 




JSH 


PCflHLT 


iSEEN AN ERROR, GO TO TH HALT ROUTINE 






|PS IS WRONG 


234 






CMP 


ll6S2S2r%0 


;IS HIGH ORDER ■ 165252 


BEQ 


.♦10 




JSR 


PC,$HLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 






{HIGH ORDER IS WRONG 


235 






CMP 


»100000r%0il 


}I8 LOW ORDER ■ 100000 


BEQ 


.♦10 




JSR 


pc,ihlt 


jSEEN AN ERROR, GO TO TH HALT ROUTINE 






|LOW ORDER IS WRONG OR WRONG SEQUENCE 


236 






CMP 


(R5)##242 




BNE 


1$ 


{IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 


INC 


CR5) 
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2431 








1 «*••»««*•«»*•*»«««••••»«»«»**««»«»«»«»»««#««««»«»•««•«•«*•««»«•***«« 


2432 








|TEST|243 


MUL 125252 


» »S6 « 165252 100000 PS • 11 


2433 








{«••»«*•«««»»•«*«#«#«««««•»»»»«*•»»•»•«»«*««»«**«••«**#««•«***•«•«•*• 


2434 














2435 


bll544 


010701 




TST243I SCOPE 






2436 


01154b 


012700 


125252 


MOV 


1125252, %0 


;LOAD MULTIPLICAND WITH 125252 


2437 


011552 


070077 


166710 


MUL 


eS6,%0 


{MULTIPLY 125252 • »S6 


2430 


«11556 


106737 


000432 


MFPS 


»tPSWORD 


{SAVE PS 


2439 


DU562 


122737 


000011 t 


100432 CMPB 


lll,9lPSW0RD 


{IS PS a 11 


2440 


0U570 


001403 




BEQ 


.♦10 




2441 


311572 


004767 


004642 


JSR 


PC,SHT.T 


{SEEN AN ERROR, GO TO TH HALT ROUTINE 


2442 












{PS IS WRONG 


2443 


511576 


000237 




237 






2444 


&11600 


022700 


165252 


CMP 


#165252, %0 


{IS HIGH ORDER e 165252 


2445 


^11604 


001403 




BEQ 


.♦10 




2446 


m 1606 


004767 


004626 


JSR 


PC,SHLT 


{SEEN AN ERROR, GO TO TH HALT ROUTINE 


2447 












{HIGH ORDER IS WRONG 


2448 


011612 


000240 




240 






2449 


S11614 


e:-2270l 


100000 


CMP 


»100000,%0il 


{IS LOW ORDER B 100000 


2450 


^11620 


001403 




BEQ 


.♦10 




2451 


0U622 






l$i 






2452 


0U622 


004767 


004612 


JSR 


PCSHLT 


{SEEN AN ERROR, GO TO TH HALT ROUTINE 


2453 












{LOW ORDER IS WRONG OR WRONG SEQUENCE 


2454 


ri>!ll626 


000241 




241 






2455 


011630 


021527 


000243 


CMP 


(R5), »243 




2456 


&11634 


001372 




BNE 


13 


{IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 


2457 


01 1636 


005215 




INC 


(R5) 




2450 














2459 
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2460 
2461 
2462 
2463 



2464 


011640 


010701 




TST244I 


SCOPE 




2465 


011642 


012700 


1252S2 




MOV 


1125252* %0 


2466 


011646 


070037 


000464 




MUL 


ilS5,%0 


2467 


011652 


106737 


000432 




HFPS 


8(IPSW0RD 


2468 


0116S6 


122737 


000011 000432 




CMPB 


«llf @#PSWORD 


2469 


dll664 


001403 






BEQ 


,*t(S 


2470 


011666 


004767 


004546 




JSR 


PC,SHLT 


2471 














2472 


011672 


000242 






242 




2473 


011674 


022700 


165252 




CMP 


#165252;%0 


2474 


011700 


001403 






BEQ 


. + 10 


2475 


011702 


004767 


004532 




JSR 


PC,$HLT 


2476 














2477 


011706 


000243 






243 




2478 


011710 


022701 


100000 




CMP 


#100000»%0|1 


2479 


011714 


001403 






BEQ 


,♦10 


2480 


011716 






181 






2481 


011716 


004767 


004516 




JSR 


pc#$hlt 


2482 














2483 


011722 


000244 






244 




2484 


011724 


021527 


000244 




CMP 


(R5)»»244 


2485 


011730 


001372 






BNE 


18 


2486 


911732 


005215 






INC 


(R5) 



}»»•«•««««#«««•««««»»«»««»»««««#»•••*«««**«•««*»**»•«««»««»•«»»««»««« 

|TiSf|244 MUli 125252 » e«S5 « 165252 100000 PS 8 11 

}»««««*«««*#««*««*«»«»»««»»«««««»#**«»«***»«*«»*«*•«*»***««««««*«**«• 



;LOAD MULTIPLICAND WITH 125252 
jMULIIPLY 125252 * @>#S5 
;SAVE PS 
;IS PS 8 11 



;SEEN AN ERROR, GO TO TH HALT ROUTINE 
;PS IS WRONG 

;IS HIGH ORDER » 165252 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
;HIGH ORDER IS WRONG 

fIS LOW ORDEB » 1 



;SEEN AN ERROR* GO TO TH HALT ROUTINE 
;LOH ORDER IS WRONG OR WRONG SEQUENCE 



;ir IN WRONG SEQUENCE GO TO THE HLT ABOVE 



2487 
2488 
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2490 








|TEST|245 


MUL 125252 


« %2 a 165252 100000 PS s 11 


2491 










2492 














2493 


011734 


010701 




TST245I SCOPE 






2494 


011736 


012700 


125252 


MOV 


«125252,%0 


|LOAD MULTIPLICAND WITH 125252 


2495 


011742 


070002 




MUL 


%2,%0 


y?«ULTIPLli 125252 » %2 


2496 


011744 


106737 


000432 


HFPS 


Ei^PSWORD 


;SAVE PS 


2497 


011750 


122737 


000011 i 


100432 CMPB 


lll,0«PSWORD 


jlS PS » 11 


2498 


&117S6 


001403 




BEQ 


, + 10 




2499 


011760 


004767 


004454 


JSR 


PC,$HLT 


jSEEN AN ERROR, GO TO TH HALT ROUTINE 


25W0 












;PS IS WRONG 


2501 


P11764 


000245 




245 




2502 


011766 


022700 


165252 


CMP 


#165252, %0 


jIS HIGH ORDER « 165252 


2503 


011772 


001403 




BEQ 


. + 10 




2504 


011774 


004767 


004440 


JSR 


PCSHLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


2505 












|HIGH ORDER IS WRONG 


2506 


012000 


000246 




246 






2507 


012002 


022701 


100000 


CMP 


«100000,%011 


;IS LOW ORDER s 100000 


2508 


&12006 


001403 




BEQ 


, + 10 


2509 


012010 






181 






2510 


012010 


004767 


004424 


JSR 


PC,8HlT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


2511 












;LOW ORDER IS WRONG OR WRONG SEQUENCE 


2512 


012014 


000247 




247 






2513 


012016 


&21527 


000245 


CMP 


(R5),«245 




2514 


012022 


001372 




BNE 


18 


}IF IN WRONG SEQUENCE 60 TO THE HLT ABOVE 


2515 


012024 


005215 




INC 


(R5) 





2516 
2517 
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2518 








2519 








2520 








2521 








2522 


012026 


010701 




2523 


012030 


012700 


125252 


2524 


012034 


070023 




2525 


012036 


106737 


000432 


2526 


912042 


122737 


000011 


2527 


012050 


001403 




2528 


012052 


004767 


004362 


2529 








2530 


012056 


000250 




253i 


012060 


022700 


165252 


2532 


012064 


001403 




2533 


012066 


004767 


004346 


2534 








2535 


012072 


000251 




2536 


012074 


022701 


100000 


2537 


012100 


001403 




2538 


012102 






2539 


8712102 


004767 


004332 


2540 








2541 


012106 


000252 




2542 


^12110 


021527 


000246 


2543 


tfUlH 


001372 




2544 


012116 


005215 




2545 








2546 









|T£ST|246 MUL 1252 

TST246I SCOPE 



000432 



MOV 




MUL 


(3)+,%0 


MFPS 


i#PSWORD 


CMPB 


»1U@|PSW0RD 


BEQ 


,♦10 


JSR 


PC,$HLT 


250 




CMP 


#165252, %0 


BEQ 


,♦10 


JSR 


PC,SHLT 


251 




CMP 


#100000, %0|1 


BEQ 


,♦10 


JSR 


pc,$hlt 


252 




CMP 


(R5),#246 


BNE 


1$ 


INC 


(R5) 



»*»»»«»»«•««««»««*«»•««#«*»«»#«««*««*»«• 

52 » (3}+ s 165252 100000 PS a u 



jLQRD MULTIPLICAND WITH 125252 
jMULTIPL¥ 125252 * (35+ 
;SAVE PS 
;IS PS 3 U 

jSEEN AN ERROR, GO TO TH HALT ROUTINE 
;PS IS WRONG 

jlS HIGH ORDER a 165252 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
|HIGH ORDER IS WRONG 

;IS LOW ORDER 8 100000 



;SEEN AN ERROR, GO TO TH HALT ROUTINE 
;LOW ORDER IS WRONG OR WRONG SEQUENCE 



;ir IN WRONG SEQUENCE GO TO THE HLT ABOVE 
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2547 








2548 








2549 








2550 








2551 


012120 


010701 




2552 


012122 


012700 


12S2S2 


2553 


012126 


&70e43 




2554 


012130 


106737 


000432 


2555 


012134 


122737 


000011 


2556 


fcrl2142 


001403 




2557 


012144 


004767 


004270 


2558 








2559 


012150 


000253 




2560 


yi2i52 


022700 


165252 


2561 


012156 


&01403 




2562 


012160 


004767 


004254 


2563 








2564 


012164 


000254 




2565 


(112166 


022701 


100000 


2566 


012172 


001403 




2567 


012174 






2568 


012174 


004767 


004240 


2569 








2570 


012200 


000255 




2571 


012202 


021527 


000247 


2572 


012206 


001372 




2573 


012210 


005215 




2574 








2575 









|TESTt247 MUL 125252 « "(3) " 165252 100000 PS a U 



TST247I SCOPE 



MOV 


1125252, %0 


MUL 


-(3),%0 


MFPS 


P«PSWORD 


CMPB 


»ll,iilPSWORD 


BEQ 


,♦10 


JSR 


PC,SHLT 


253 




CMP 


f 165252, %0 


BEQ 


,♦10 


JSR 


PC,8HLT 


254 




CMP 


«100000,%0|1 


BEQ 


,♦10 


JSR 


PCSHLT 


255 




CMP 


(R5),#247 


BNE 


19 


INC 


(R5) 



jLOAD MULTIPLICAND WITH 125252 
^MULTIPLY 125252 ♦ -(3) 
;SAVE PS 
;IS PS s 11 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
;PS IS WRONG 

;IS HIGH ORDER ■ 165252 

ySEEN AN ERROR, GO TO TH HALT ROUTINE 
;HIGH ORDER IS WRONG 

;IS LOW ORDER a 1 



}SEEN AN ERROR, GO TO TH HALT ROUTINE 
;LOW ORDER IS WRONG OR WRONG SEQUENCE 



;IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 
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2S76 
2577 

2578 
2579 



2SS0 


012212 


010701 


7ST250t 


SCOPE 




258i 


312214 


012700 


125292 


HOV 


I125252ft0 


2582 


012220 


070064 


000002 


mh 


2(4)»t0 


2563 


012224 


106737 


000432 


HfPS 


»IP8W0RD 


2364 


e>i2230 


122737 


000011 000432 


CMPB 


lUrllPSWORO 


256S 


012236 


001403 




BEQ 




2586 


012240 


^04767 


004174 


JSB 


PCIHLT 


2587 












2588 


012244 


0002S6 




256 




2589 


012246 


022700 


16S2S2 


CMP 


8165252*10 


2590 


012252 


001403 




BEQ 


B + 10 


2591 


012254 


004767 


004160 


J8B 


PCflHLT 


2592 












2593 


&12260 


000237 




287 


»100000»%0il 


2594 


012262 


022701 


100000 


CMP 


2595 


1112266 


001403 




BEQ 


9 + 10 


2596 


012270 




HI 






2597 


012270 


§04767 


004144 


JSR 


PCfSHtT 


2598 












2599 


012274 


B00260 




260 




2600 


012276 


021527 


0002S0 


CMP 


(RS3r#2S0 


2601 


012302 


001372 




BHE 


18 


2602 


012304 


005215 




INC 


(R5) 



)»••««•••»•»•«*•»•*»•••*•••••»••«««**•*»»*«*»«••«*•«»•*«•«*•*«««••*«« 
|TEST|250 MUL 125252 « 2(4} ■ 165252 100000 PS ■ 11 

}•**•»•««•••••••••••«»«»«»«•«««»»«»««««»*«*•*•««»••*••*•«««*»»•*«#»** 



;LOAO MULTIPLICAND WITH 125252 
^MULTIPLY 125252 • 2(4) 
I SAVE PS 
;IS PS ■ 11 

I SEEN AN ERROR, CO TO TH HALT ROUTINE 
|PS IS WRONG 

}IS HIGH ORDER a 1692S2 

I SEEN AN ERROR, GO TO TH HALT ROUTINE 
;HIGH ORDER IS WRONG 

lis LOW ORDER » 100000 



I SEEN AN ERROR* GO TO TH HALT ROUTINE 
;LOM ORDER IS WRONG OR WRONG SEQUENCE 



;IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 



2603 
2604 
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2605 








1 «««•«•«•««»•«««*•««««««•»»»•«*»»*«*«««•»«»»•»»****•*»*«««*«»««*«««*• 


2606 








?TEST|251 


MUL 125252 


* f(4) a 165252 100000 PS » 11 


2607 








|tf 


2608 














2609 


912306 


010701 




TST251I SCOPE 






2610 


012310 


012700 


1252S2 


MOV 


#125252#%0 


iLOAD MULTIPLICAND WITH 125252 


2611 


012314 


070074 


000000 


MUL 


i(4),%0 


jMULTIPLY 125252 » §(4) 


2612 


012320 


106737 


000432 


MFPS 


9«PSW0RD 


;SAVE PS 


2613 


1^12324 


122737 


000011 i 


}00432 CMPB 


»ll,i#PSWORD 


;IS PS » 11 


2614 


012332 


001403 




BEQ 


,4-10 




2615 


Irtl2334 


004767 


004100 


JSR 


PC,$HLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


2616 












|PS IS WRONG 


2617 


012340 


000261 




261 






2618 


012342 


022700 


165252 


CMP 


#165252, %0 


jIS HIGH ORDER « 165252 


2619 


012346 


001403 




BEQ 


.♦10 




2620 


012350 


004767 


004064 


JSR 


PC, S HLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


2621 












;HIGH ORDER IS WRONG 


2622 


012354 


000262 




262 






2623 


012356 


022701 


100000 


CMP 


#100000,1011 


;IS LOW ORDER « 100000 


2624 


kll2362 


001403 




BEQ 


,♦10 




2625 


012364 






HI 






2626 


012364 


004767 


004050 


JSR 


PCSHLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


2627 












;LOW ORDER IS WRONG Op WRONG SEQUENCE 


2628 


012370 


000263 




263 






2629 


012372 


021527 


000251 


CMP 


(R5),«251 




2630 


012376 


001372 




BNE 


1$ 


;IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 


2631 


012400 


005215 




INC 


(R5) 




2632 














2633 
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2634 








2635 








263S 








2637 








2638 


012402 


010701 




2639 


012404 


012700 


125252 


2640 


©12410 


070034 




2641 


013412 


106737 


000432 


2642 


tl24l6 


122737 


000011 


2643 


012424 


001403 




2644 


012426 


S04767 


004006 


2645 








2646 


1112432 


000264 




2647 


il2434 


022700 


165232 


2648 


i»12440 


00H03 




2649 


012442 


004767 


003772 


2650 








2651 


£12446 


000265 




2632 


gl2450 


022701 


100000 


2653 


i»12454 


001403 




2654 


012456 






2655 


012456 


004767 


003736 


2656 








2657 


012462 


000266 




2658 


1912464 


021527 


000252 


2659 


012470 


001372 




2660 


012472 


005215 




2661 








2662 









?TEST|^52 MUL 125252 # i(4)t s 163252 100000 PS s U 



;LOAO MULTIPLICAND WITH 125252 

IMULIIPLY 125252 « iC4)* 
I SAVE PS 
lis PS s 11 



SCOPE 




MOV 


•125252ft0 


MUL 


P ( 4 ) ♦ » %0 


MfPS 


»»PSWORD 


CMPB 


f 111 9»PSW0R0 


BEQ 


,♦10 


JSR 


PC^IHI^T 


264 




CMP 


I165252»%0 


BEQ 


.♦10 


JSR 


PCflHLT 


265 




CMP 


#100000*1011 


BEQ 


,♦10 


J5R 


pc»$hlt 


266 




CMP 


(R5),«252 


BNE 




INC 


(R5) 



;8EEN AN ERROR, GO TO TH HALT ROUTINE 
|PS IS WRONG 

;IS HIGH ORDER ■ 165252 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
jHIGH ORDER IS WRONG 

lis LOW ORDER ■ 100000 



;SEEN AN ERROR, GO TO TH HALT ROUTINE 
{LOW ORDER IS WRONG Op WRONG SEQUENCE 



;ir IN WRONG SEQUENCE GO TO THE HLT ABOVE 



DFKACA MACyil 30(1046) 04-AUG-77 
DFKACA.SRC ie-NOV-75 00100 



14109 PAGE 73 

MUL INSTRUCTION TESTS 



2663 








2664 








2665 








2666 








2667 


012474 


010701 




2668 


k)t2476 


e»12700 


125252 


2669 


i}l2502 


070054 




2670 


312504 


106737 


000432 


2671 


012510 


122737 


000011 


2672 


1^12516 


001403 




2673 


012520 


004767 


003714 


2674 








2675 


012524 


000267 




2676 


k;12526 


022700 


165252 


2677 


012532 


001403 




2678 


012534 


004767 


003700 


2679 








2680 


$12540 


000270 




2681 


012542 


022701 


100000 


2682 


012546 


001403 




2683 


€S12550 






2684 


^12550 


004767 


003664 


2685 








2686 


012554 


000271 




2687 


012556 


021527 


000253 


2688 


1^*12562 


001372 




2689 


012564 


005215 




2690 








2691 









000432 



} »««»««««»»*•»«*»»«»•»«««»««»«»«*««»««««««*«#»«*««««»«»*««*««»«««#«*• 
;TEST|253 MUL 125252 » »-(4) « 165252 100000 PS • U 

;«««*«»«#«*««»»« »•»«««»««#*«»#»»««««« »•«#«*«««««««« 



;LOAD MULTIPLICAND WITH 125252 
{MULTIPLY 125252 • 9-(4) 

{SAVE PS 
J IS PS s U 



SCOPE 




MOV 


1125252, %0 


MUL 


9-(4;,%0 


MFPS 


91 PSWORO 


CMPB 


«ll,iiPSWORD 


BEQ 


.♦10 


JSR 


PC,$HLT 


267 




CMP 


•165252, %0 


BEQ 


,♦10 


JSR 


PC, 8 HLT 


270 




CMP 


#100000, %0il 


BEQ 


,♦10 


JSR 


PC,$HLT 


271 




CMP 


(R5),|253 


BNE 


18 


INC 


(R5) 



;SEEN AN ERROR, GO TO TH HALT ROUTINE 
;PS IS WRONG 

lis HIGH ORDER « 165252 

I SEEN AN ERROR, GO TO TH HALT ROUTINE 
{HIGH ORDER IS WRONG 

lis LOW ORDER s 100000 



I SEEN AN ERROR, GO TO TH HALT ROUTINE 
I LOW ORDER IS WRONG OR WRONG SEQUENCE 



I IF IN WRONG SEQUENCE GO TO THE HLT ABOVE 
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2692 








2693 








2694 








269S 








2696 








2697 








2698 








2699 








2700 








2701 








2702 


012566 


010701 




2703 


012570 


012700 


000000 


2704 


012574 


012701 


000004 


2705 


^12600 


071027 


000002 


2706 


012604 


106737 


000432 


2707 








2706 


012610 


122737 


000000 


2709 


&1 2616 


001403 




2710 


012620 


004767 


003614 


271 1 








2712 


(912624 


000272 




2713 








2714 


012626 


022700 


000002 


2715 


1912632 


001403 




2716 


i»l2634 


004767 


003600 


2717 








2718 


012640 


000273 




2719 








2720 


012642 


022701 


000000 


2721 


012646 


001403 




2722 


012650 


004767 


003564 


2723 








2724 


012654 


000274 




2725 


(112656 


021527 


000254 


2726 


»12662 


001403 




2727 


012664 


004767 


003550 


2728 








2729 


012670 


000275 




2730 


012672 


005215 




2731 









;»»«««#»»•«*»«*««**«*«•««•#»•«** 

t DJV INSTRUCTION TESTS 



|TEST|2S4 DiV 4 / »2 s 2 REM s PS e 



TST254I SCOPE 



000432 



MOV 
MOV 
DIV 
MFPS 


S0r%0 
»4,%04-l 
#2f %0 
@#PSWORD 


CMPB 

BEQ 

JSR 


»0,9#PSWORD 

,♦10 

PC,$HLT 


272 




CMP 
BEQ 
JSR 


12, %0 

,♦10 

PC,«Hl,T 


273 




CMP 
BEQ 
JSR 


#0f%0-(-l 

,♦10 

PC,$HLT 


274 

CMP 
BEQ 
JSR 


(R5)f #254 

.♦10 
PC,8HLT 


275 
INC 


CR5) 



jLOAD HIGH ORDER WITH 
iLOAD I^ON ORDER NlTH 4 
yDlVIDE BY #2 
;SAVE PS 

;IS PS B 

•SEEN AN ERROR, GO TO TH HALT ROUTINE 
jP8 IS WRONG 



;IS QUOTIENT b 2 

•SEEN AN ERROR, GO TO TH HALT ROUTINE 
jQUOTIENT IS WRONG 



;IS REMAINDER a 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
•WRONG REMAINDER 



;ir IN WRONG SEQUENCE GO TO THE HLT 
,SEEN AN ERROR, GO TO TH HALT ROUTINE 
;TeST IS IN WRONG SEQUENCE 
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2732 








2733 








2734 








2735 








2736 


(112674 


010701 




2737 


012676 


012702 


177777 


2738 


&»t2702 


k?12703 


177767 


2739 


012706 


P71227 


000003 


2740 


«?12712 


106737 


000432 


2741 








2742 


ei27l6 


122737 


000010 


2743 


012724 


001403 




2744 


e»l2726 


004767 


003506 


2745 








2746 


012732 


000276 




2747 








2748 


012734 


022702 


177775 


2749 


012740 


001403 




2750 


912742 


004767 


003472 


2751 








2752 


til2746 


000277 




2753 








2754 


012750 


022703 


000000 


2755 


012754 


001403 




2756 


012756 


004767 


003456 


2757 








2758 


012762 


000300 




2759 


012764 


021527 


000255 


2760 


012770 


001403 




2761 


012772 


004767 


003442 


2762 








2763 


012776 


000301 




2764 


013000 


005215 




2765 









|TEST|255 DIV «1 -9, / #3 ■ -3 REM a PS » 10 

I 

TST25SI SCOPE 

;LOAO HIGH ORDER WITH -1 
;LOAD LOW ORDER WITH .9, 
idlVIDE BY 93 
;SAVE PS 

;IS PS n 10 

ySEEN AN ERROR, GO TO TH HALT ROUTINE 
;PS IS WRONG 



J IS QUOTIENT a -3 



MOV 
MOV 
DIV 
MFPS 


»-l,%2 
#-9,,%2+l 
• 3,%2 

@#PSWORD 


CMPB 

BEQ 

JSR 


I10,9»PSWORD 

,♦10 
PC,$HLT 


276 




CMP 
BEQ 
JSR 


»«3,%2 

,♦10 

PCSHLT 


277 




CMP 
BEQ 
JSR 


t0,%24-l 

,♦10 
PCIHLT 


300 
CMP 
BEQ 
JSR 


(R5),«255 

,♦10 

PC,8HLT 


301 
INC 


(R5) 



;SEEN AN ERROR, GO TO TH HALT ROUTINE 
{QUOTIENT IS WRONG 



;IS REMAINDER 



jSEEN AN ERROR, GO TO TH HALT ROUTINE 
; WRONG REMAINDER 



;ir IN WRONG SEQUENCE GO TO THE HLT 
;SEEN AN ERROR, GO TO TH HALT ROUTINE 
J TEST IS IN WRONG SEQUENCE 
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2766 








1 


2767 








|TEST|256 


DIV 9, 


/ #2 B 4 REM a 1 PS b 


2768 








; »•«««*»«««»»«»««««*»«»«««#«*«*«»«««»«»««««*»»»««»#»««»««««•«»«««««»* 


2769 














2770 


1113002 


010701 




TST256I SCOPE 






2771 


»J 3004 


(#10501 




MOV 


B5,R1 


;SAVE R5 


2772 


01 3006 


012704 


000000 


MOV 


I0«%4 


;LOAD HIGH ORDER WITH 


2773 


01 3012 


012705 


000011 


MOV 


»9,#%4+l 


;LOAD LOW ORDER WITH 9, 


2774 


013016 


071427 


000002 


DIV 


12, %4 


^DIVIDE BY «2 


2775 


1)13022 


106737 


000432 


MFPS 


e«pswoRO 


J SAVE PS 


2776 












2777 


»1 3026 


1 22737 


000000 t 


100432 CMPB 


#0,9»PSWORD 


; IS PS a 


2778 


013034 


001403 




BEQ 


,♦10 




2779 


013036 


004767 


003376 


JSR 


PC,$HLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


2780 












|PS IS WRONG 


2701 


613042 


£^00302 




302 






2782 














2783 


013044 


022704 


000004 


CMP 


#4,%4 


fIS QUOTIENT a 4 


2784 


»13050 


00H03 




BEQ 


.♦10 




2785 


013052 


004767 


003362 


JSP 


PC,SHLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


2786 












;QUOTIENT IS WRONG 


2787 


&13056 


000303 




303 






2768 














2789 


1 3060 


U22705 


000001 


CMP 


ll,%44l 


;IS REMAINDER a i 


2790 


013064 


001403 




BEQ 


,♦10 




2791 


013066 


&04767 


003346 


JSf< 


PC,$HLT 


•SEEN AN ERROR, GO TO TH HALT ROUTINE 


2792 












jWRONG REMAINDER 


2793 


01 3072 


t!00304 




304 






2794 


k)13074 


010105 




MOV 


R1,R5 


J RESTORE R5 


2795 


313076 


021527 


000256 


CMP 


(R5)#i256 




2796 


013102 


001403 




BEO 


,♦10 


;IF IN WRONG SEQUENCE GO TO THE HLT 


2797 


kn3104 


004767 


003330 


JSh 


PC,$HLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


2798 












;TEST IS IN WRONG SEQUENCE 


2799 


f?13110 


000305 




305 






2800 


013112 


005215 




INC 


(R5) 




28k>1 
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2802 










2803 








|TEST|257 


DIV -1 -9, 


/ #2 3 -4 REM 8-1 PS B 10 


2804 










2805 














2806 


013114 


010701 




TST257I SCOPE 






2807 


013116 


012700 


177777 


MOV 


t-1,%0 


;LOAD HIGH ORDER WITH -1 


2808 


013122 


012701 


177767 


MOV 


»-9,,%0^1 


;LOAD LOW ORDER WITH -9. 


2809 


U13126 


071027 


000002 


DIV 


«2,%0 


jDIVIDE BY #2 


2810 


i;l3132 


106737 


000432 


MFPS 


§#PSWORD 


J SAVE PS 


2811 
2812 


013136 


122737 


000010 


00432 CMPB 


«10,8»PSWORD 


lis PS B 10 


2813 


k»l3l44 


001403 




BEQ 


.♦10 


2814 


013146 


004767 


003266 


JSR 


PC,$HtT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


2815 












|PS IS WRONG 


2816 


B13152 


000306 




306 




2817 














2818 


013154 


022700 


177774 


CMP 


#-4,%0 


J IS QUOTIENT a -4 


2819 


013160 


001403 




BEQ 


.♦10 




2820 


!iil3162 


004767 


003252 


JSR 


PC,$HLT 


•SEEN AN ERROR, GO TO TH HALT ROUTINE 


2821 












;QUOTIENT IS WRONG 


2822 


013166 


000307 




307 






2823 














2824 


013170 


022701 


177777 


CMP 


#-l,%0+l 


;IS REMAINDER a -1 


2825 


013174 


&01403 




BEQ 


,♦10 




2826 


(^13176 


004767 


003236. 


JSR 


PCSHLT 


•SEEN AN ERROR, GO TO TH HALT ROUTINE 


2827 












; WRONG REMAINDER 


2828 


913202 


000310 




310 






2829 


U13204 


021527 


000257 


CMP 


(R5),»257 




2830 


013210 


001403 




BEQ 


,♦10 


;IF IN WRONG SEQUENCE GO TO THE HLT 


2831 


&13212 


004767 


003222 


JSR 


PC,$HLT 


iSEEN AN ERROR, GO TO TH HALT ROUTINE 


2832 












{TEST IS IN WRONG SEQUENCE 


2833 


013216 


EF00311 




3U 






2834 


&13220 


005215 




INC 


(R5) 




2835 
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2836 

2837 
2838 
3839 
2840 
2841 
2842 
2843 
2844 
2845 
2846 
2847 
2848 
2849 
28S0 
2851 
2832 
2853 
2834 
3855 
2656 
2857 
2858 
2859 
2860 
2861 
2863 
2863 
2664 
2865 
2866 
2867 
3868 
3869 



)••#*••••««»••«««»«»«•*•*•««»#«•»•«'«««*«»*•«»««*•»•»#««»••»••«#«*««•« 

|Ti8Tl260 DIV 2/ #«3 80 REM a 2 PS a 4 



013222 


010701 




TSTa60t SCOfE 










013224 


012702 


000000 


MOV 


e0»%2 


iLOAD HIGH ORDER WITH 






01 3230 


012703 




MOV 


92f %2'f 1 


}LOAO LOM ORDER WITH 2 






013234 


07 1227 


177775 


DIV 


9*"3»%2 


iDIVIDi BY #»3 






@1 3240 


106737 


000432 


MFPS 


@$PSMORD 


|SAVE PS 






013244 


1 22737 


000004 000433 


CMPB 


#4^ 9#PSW0RD 


; IS PS a 4 






01 3252 






BEQ 


9*10 










004767 




JSR 


PC» 8HLT 


{SEEN AN ERROR, GO TO TH 


HALT 


ROUTINE 












;PS IS WRONG 






01 3360 


00031 2 




312 










013262 


022702 


000000 


CMP 


10, %2 


;IS QUOTIENT a 






013266 


001403 




0EQ 










013370 


004767 


003144 


JSR 


PC,$HtT 


;SEEN AN ERROR, GO TO TH 


HALT 


ROUTINE 












iQUOTIENT IS WRONG 






013274 


000313 




313 










013276 


022703 


000002 


CMP 


#2,%2*1 


J IS REMAINDER 8 2 






013302 


001403 




BEQ 


.♦10 








013304 


004767 


003130 


JSR 


PC,$HLT 


;SEEN AN ERROR, GO TO TH 


HALT 


ROUTINE 










;WRONG REMAINDER 






013310 


000314 




314 










013312 


021527 


000260 


CMP 


(R5}f U60 








013316 


001403 




BEQ 




;ir IN WRONG SEQUENCE GO 


TO THE HLT 


913320 


K^04767 


003114 


JSR 


PC,$Hl,T 


{SEEN AN ERRORf GO TO TH 


HALT 


ROUTINE 






{TEST IS IN WRONG SEQUENCE 




f 13324 


00031S 




315 










013326 


005215 




INC 


CR5) 
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2870 










3671 








;TEST|261 


DIV -1 «: 


3872 








1 


3873 












3874 


013330 


B10701 




TST261I SCOPE 




3875 


013332 


010501 




MOV 


R5,Rl 


2876 


1^13334 


012704 


177777 


MOV 


l«l,%4 


3877 


013340 


012705 


177776 


MOV 


••2,%4+l 


3878 


013344 


071427 


000003 


DIV 


13, %4 


3879 


013350 


106737 


000433 


MFPS 


&#PSWORD 


3880 
3881 


013354 


122737 


000004 C 


100432 CMPB 


#4,&#PSW0RD 


3883 


013362 


001403 




BEQ 


,tl0 


3883 


013364 


004767 


003050 


JSR 


PCS HLT 


3884 
3885 


4>13370 


000316 




316 




3886 












3887 


013372 


022704 


000000 


CMP 


10, %4 


3888 


013376 


001403 




BEQ 


,♦10 


3889 


013400 


004767 


003034 


JSR 


PC,$HLT 


3890 












2891 


013404 


000317 




317 




3893 












3893 


»13406 


022705 


177776 


CMP 


#•2,14+1 


3894 


013412 


001403 




BEQ 


,♦10 


2895 


013414 


004767 


003020 


JSP 


PC,SHLT 


2896 












2897 


013430 


000320 




320 




2898 


013433 


010105 




MOV 


R1,R5 


2899 


013424 


021527 


000261 


CMP 


(R5),«261 


3900 


013430 


001403 




BEQ 


,♦10 


3901 


013432 


004767 


003002 


JSR 


PC,8HLT 


3903 












3903 


013436 


000321 




321 




3904 


013440 


005315 




INC 


(R5) 


2905 













{SAVE R5 

{LOAD HIGH ORDER WITH -1 
{LOAD LOW ORDER WITH -2 
{DIVIDE BY «3 
{SAVE PS 

{IS PS 3 4 

{SEEN AN ERROR, GO TO TH HALT ROUTINE 
{PS IS WRONG 



{IS QUOTIENT a 

{SEEN AN ERROR, GO TO TH HALT ROUTINE 
{QUOTIENT IS WRONG 



{IS REMAINDER s .2 

{SEEN AN ERROR, GO TO TH HALT ROUTINE 
{WRONG REMAINDER 

{RESTORE R5 

{IF IN WRONG SEQUENCE GO TO THE HLT 
{SEEN AN ERROR, GO TO TH HALT ROUTINE 
{TEST IS IN WRONG SEQUENCE 
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14109 PkQZ §i 

DIV iNSTPUCflON TESTS 



}«»#«•*«••#«*»*•«••»•«**•«•«•*«#••«*»«««•««*«*•««*•*•«*•****«***•«**• 



2907 








;TSSTt2§2 


DIV «1 »l 


/ #1 S8 »1 REM B PS 8 10 


2908 










2909 














2910 


013442 


§10701 




TST262i SCOPE 






2911 


©13444 


012700 


177777 


MOV 


#«1»%0 


iLOAO HIGH ORDER MITH »1 


2912 


013430 


012701 


177777 


HOV 


#«1#%0^1 


iLOJ^D LOW ORDER WITH »1 


2913 




071027 


000001 


DZV 


»1»%0 


^DIVIDE BY n 


29H 


&i3460 


106737 


000432 


HFPS 


@#PSWOPD 


{SAVE PS 


291S 














2916 


in 3464 


!22737 


000010 000432 


CMPB 


#10f I9PSM0RD 


lis PS a 10 


2917 


*#i3472 


001403 




BEQ 


,♦10' 




1918 


1^13474 


004767 


002740 


JSP 


PC,$HLT 


iSEEN AN ERROR, GO TO TH HALT ROUTINE 


2919 












;PS IS WRONG 


2920 


013S00 


000322 




322 






2921 














2922 


^! 3S02 


022700 


177777 


CMP 


l»|y%0 


jIS QUOTIENT a »i 


2923 


913506 


001403 




BEQ 


,♦10 




2924 


HI 3510 


004767 


002724 


JSB 


PC,$HLT 


iSEEN AN ERROR, GO TO TH HALT ROUTINE 


2925 










{QUOTIENT IS WRONG 


2926 


^13514 


000323 




323 






2927 














2928 


©13316 


022701 


000000 


CMP 


#0f 10^1 


;IS REMAINDER s 


2929 


1^13522 


001403 




BEQ 


,*10 




2930 


013524 


004767 


002710 


JSP 


PCiHLT 


;SEEN AN ERROR, 60 TO TH HALT ROUTINE 


2931 










{WRONG REMAINDER 


2932 


013530 


000324 




324 






2933 


»13532 


021S27 


000263 


CMP 


(R5),S262 




2934 


013536 


001403 




BEQ 


9*10 


{IF IN WRONG SEQUENCE GO TO THE HLT 


2935 


0! 3540 


004767 


002674 


JSP 


PC,$HLT 


{SEEN AN ERROR, GO TO TH HALT ROUTINE 


2936 












{TEST IS IN WRONG SEQUENCE 


2937 


013544 


000325 




325 






2938 


013546 


005215 




INC 


(R5) 





FKACA 


MACYll 


30(1046) 


04»AUG«77 
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FKACA, 


SRC 1 


8S.N0V-75 


00 s 00 


DIV INSTRUCTION 


TESTS 




2940 








{ »»«•«»»»»»»«««««»«»•«««»«»«*««««»*»***««*««•»»**»»««««»«««*»««*«««*« 


2911 








{TEST|263 


DIV 0/ 


«1 a REM s PS s 4 


2942 








{•**»«»««««»«»«««»«»•«»««»»»«»»**«**««««*»«*»**«*»«*«•«*««»*•«***«««* 


2943 














2944 


IJ13550 


010701 




TSI263I SCOPE 






2945 


^13552 


012700 


000000 


HOV 


#0,%0 


{LOAD HIGH ORDER WITH 


2946 


013556 


012701 


000k)00 


MOV 


»0,%04-l 


{LOAD LOW ORDER WITH 


2947 


013562 


071027 


000001 


DIV 


«1,%0 


{DIVIDE BY #1 


2948 


#13566 


106737 


000432 


MFPS 


eiPSWORD 


{SAVE PS 


2949 














2950 


U13S72 


122737 


000004 000 


432 CMPB 


»4,@iPSW0RD 


{IS PS a 4 


2951 


013600 


001403 




BEQ 


• + 10 




2952 


013602 


004767 


002632 


JSR 


PC,$HLT 


{SEEN AN ERROR, GO TO TH HALT ROUTINE 


2953 












{PS IS WRONG 


2954 


013606 


000326 




326 






2955 














2956 


013610 


022700 


000000 


CMP 


«0,%0 


{IS QUOTIENT a 


2957 


rl3614 


001403 




BEQ 


.♦10 




2958 


013616 


004767 


002616 


JSR 


PC,SHLT 


{SEEN AN ERROR, GO TO TH HALT ROUTINE 


2959 












{QUOTIENT IS WRONG 


2960 


013622 


600327 




327 






2961 














2962 


013624 


022701 


000000 


CMP 


»0,%0-»-l 


{IS REMAINDER s 


2963 


iH3630 


001403 




BEQ 


,♦10 




2964 


013632 


004767 


002602 


JSR 


PC,SHLT 


{SEEN AN ERROR, GO TO TH HALT ROUTINE 


2965 












{WRONG REMAINDER 


2966 


013636 


000330 




330 






2967 


013640 


021527 


000263 


CMP 


(RS),#263 




2968 


4)13644 


001403 




BEG 


, + 10 


{IF IN WRONG SEQUENCE GO TO THE HLT 


2969 


1)13646 


004767 


002566 


JSR 


PC,$HLT 


{SEEN AN. ERROR, GO TO TH HALT ROUTINE 


2970 












{TEST IS IN WRONG SEQUENCE 


2971 


013652 


000331 




331 






2972 


013654 


005215 




INC 


CR5) 




2973 
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2974 








297S 








2976 








2977 








2978 


013696 


010701 




2979 


013660 


012702 


177777 


2980 


013664 


012703 


125252 


2981 


^13670 


071227 


000002 


2982 


013674 


J06737 


000432 


2983 








2984 


013700 


122737 


000010 


2985 


013706 


001403 




2986 


013710 


004767 


002524 


2987 








2988 


{^13714 


000332 




2989 








2990 


013716 


022702 


152525 


2991 


013722 


001403 




2992 


013724 


004767 


002510 


2993 








2994 


013730 


000333 




2995 








2996 


013732 


022703 


000000 


2997 


013736 


001403 




2998 


013740 


004767 


002474 


2999 
3000 


&;13744 


000334 




3001 


013746 


021527 


000264 


3002 


013752 


001403 




3003 


H3754 


004767 


002460 


3004 








3005 


013760 


000335 




3006 


913762 


005215 




30i57 









}TESTi264 
TST264I SCOPE 



»««««««««*»•««»««*«««*»*•»««**«»«*«*•«*««««*»«**•*««*••* 

DIV «l 125252 / #2 a 152525 REM s pS a 



MOV 


l»l#%2 


7I.OAO HIGH ORDER MITH 


•1 




MOV 


f 125252, %2<»-l 


;LOAD LO^ ORDER MiTH 


125252 




DIV 


#2»%2 


jDIVIDE BY »2 






MFPS 


0#PSWORD 


;SAVE PS 






CMPB 


»10f @»PSWORD 


;IS PS s 10 






BEQ 


, + 10 








asR 


PCSHLT 


•SEEN AN ERROR, GO TO 


TH HALT 


ROUTINE 






|PS IS WRONG 






332 










CMP 


#152525»%2 


;IS QUOTIENT a 152525 






BEQ 


, + 10 








JSR 


PC,$HLT 


jSEEN AN ERROR, GO TO 


TH HALT 


ROUTINE 






^QUOTIENT IS WRONG 






333 










CMP 


#0,%24'1 


;IS REMAINDER s 






BEQ 


s + 10 








JSR 


PC,$HLT 


;SEEN AN ERROR, GO TO 


TH HALT 


ROUTINE 






|WRONG REMAINDER 






334 










CMP 


CR5)r#264 








BEQ 


,♦10 


;IF IN WRONG SEQUENCE 


GO TO THE HLT 


JSR 


PC,SHLT 


iSEEN AN ERROR, GO TO 


TH HALT 


ROUTINE 






;TEST IS IN MRONG SEQUENCE 




335 










INC 


(R5) 
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3008 










3009 








;TESTi265 


DIV -1 


3010 










3011 












3012 


013764 


010701 




TST265I SCOPE 




3013 


013766 


010501 




MOV 


R5,R1 


3014 


013770 


012704 


177777 


MOV 


«-l,%4 


3015 


013774 


012705 


177777 


MOV 


#-i,%4+l 


3016 


014000 


071427 


177777 


DIV 


#-«l,%4 


3017 


014004 


106737 


000432 


MFPS 


9#PSW0RD 


3018 












3019 


014010 


122737 


000000 


00432 CMPB 


#0,9*PSWORO 


3020 


014016 


001403 




BEQ 


.♦10 


3021 


014020 


004767 


002414 


JSR 


PCSHLT 


3022 












3023 


014024 


000336 




336 




3024 












3025 


014026 


022704 


000001 


CMP 


#1,%4 


3026 


(il4032 


001403 




BEQ 


.♦10 


3027 


014034 


004767 


002400 


JSR 


PC,$HLT 


3028 












3029 


014040 


000337 




337 




3030 












3031 


014042 


022705 


000000 


CMP 


«0,%4>1 


3032 


rl4046 


001403 




BEQ 


,♦10 


3033 


014050 


004767 


002364 


JSR 


PC,$HLT 


3034 












3035 


014054 


000340 




340 




3036 


014056 


010105 




MOV 


R1,R5 


3037 


014060 


021527 


000265 


CMP 


(R5),»265 


3038 


&14064 


001403 




BEQ 


,♦10 


3039 


014066 


004767 


002346 


JSR 


PC,$HLT 


3040 












3041 


1114072 


000341 




341 




3042 


014074 


005215 




INC 


(R5) 


3043 













;SAVE R5 

T'LOAO HIGH ORDER WITH «1 
jLOAD LOW ORDER WITH -j 
jDIVIDE BY »-l 
ySAVE PS 

J IS PS s 

ySEEN AN ERROR, GO TO TH HALT ROUTINE 
;PS IS WRONG 



J IS QUOTIENT a 1 



•SEEN AN ERROR, GO TO TH HALT ROUTINE 
{QUOTIENT IS WRONG 



;IS REMAINDER a 

ySEEN AN ERROR, GO TO TH HALT ROUTINE 
;WRONG REMAINDER 

I RESTORE R5 

jIF IN WRONG SEQUENCE GO TO THE HLT 
;SEEN AN ERROR, GO TO TH HALT ROUTINE 
;TEST IS IN WRONG SEQUENCE 
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3044 
3045 
3046 
3047 
3048 
3049 
3050 
3051 
3052 
3053 
3054 
3055 
3056 
3057 
3058 
3059 
3060 
3061 
3062 
3063 
3064 
3065 
3066 
3067 
3068 
3069 
3070 
3071 
3072 
3073 
3074 
3075 
3076 
3077 



|TEST|266 DiV 25253 1 / #125252 » 100000 REM a 1 PS 



01 4076 


01 0701 














014100 


012700 


025253 


MOV 


»2S253»%0 


;LOAD HIGH ORDER WITH 


25253 




&14104 


01270] 


000001 


MOV 


»lf %04-l 


jLOAD LOW ORDER WITH ; 


I 




014110 


071027 


125252 


DIV 


«12S252f%0 


;DIVIDE BY #125252 






014114 


J06737 


000432 


MFPS 


t#PSWORD 


iSAVE PS 






CI 4 120 


122737 


000010 000432 


CMPB 


#10f @IPSW0RD 


;IS PS B 10 






914126 


P01403 




BEQ 


, + 10 










004767 


002304 


JSR 


PC,$HLT 


ySEEN AN ERROR, GO TO 


TH HALT 


ROUTINE 












;PS IS WRONG 






ei4134 


000342 




342 










014136 


022700 


100000 


crtp 


»1000<'I0»%0 


;IS QUOTIENT s 100000 






014142 


001403 




BEQ 


,♦10 








&14144 


004767 


002270 


JSR 


PC,$HLT 


;SEEN AN ERROR, GO TO 


TH HALT 


ROUTINE 












iQUOTIENT IS WRONG 






014150 


000343 




343 










014152 


022701 


000001 


CMP 


»U%0^1 


;IS REMAINDER a 1 






014156 


001403 




BEQ 


,♦10 








il4160 


004767 


002254 


JSR 


PC,$HLT 


J SEEN AN ERROR, GO TO 


TH HALT 


ROUTINE 












;WRONG REMAINDER 






014164 


000344 




344 










l!?14166 


021527 


000266 


CMP 


{R5},»266 








014172 


001403 




BEQ 


,♦10 


;ir IN WRONG SEQUENCE 


GO TO THE HLT 


014174 


004767 


002240 


JSR 


PC,SHLT 


tSEEN AN ERROR, GO TO 


TH HALT 


ROUTINE 












tTEST IS IN WRONG SEQUENCE 




fl4200 


000345 




345 










*^14202 


005215 




INC 


CR5) 
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•FKACA, 


,SRC 11 


8»N0V»75 


00100 


DIV INSTRUCTION 


TESTS 




3078 










3079 








|TESTi267 


DIV 37777 


77777 / #77777 » 77777 REM s 77776 


3080 










3081 














3082 


014204 


010701 




TST267I SCOPE 






3083 


914206 


012702 


037777 


MOV 


#37777,12 


jLOAD HIGH ORDER WITH 37777 


3084 


!r)142l2 


012703 


077777 


MOV 


#77777, %2+l 


jLOAD LOW ORDER WITH 77777 


3085 


i»l42l6 


071227 


077777 


DIV 


#77777,12 


jDIVIDE BY #77777 


3086 


014222 


106737 


000432 


MFPS 


9»PSWoRD 


;SAVE PS 


3087 
3088 


014226 


122737 


000000 


00432 CMPB 


«0,9«PSWORD 


;IS PS B 


3089 


014234 


001403 




BEQ 


,♦10 




3090 


014236 


004767 


002176 


JSR 


PCSHtT 


J SEEN AN ERROR, GO TO TH HALT ROUTINE 


3091 












|PS IS WRONG 


3092 


014242 


000346 




346 




3093 














3094 


014244 


022702 


077777 


CMP 


•77777, %2 


lis QUOTIENT a 77777 


3095 


014250 


001403 




BEQ 


,♦10 




3096 


P14252 


004767 


002162 


JSR 


PCSHLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


3097 












jQUOTIENT IS WRONG 


3098 


014256 


000347 




347 




3099 














3100 


014260 


022703 


077776 


CMP 


»77776»%2+l 


jIS REMAINDER a 77776 


3101 


tM4264 


001403 




BEQ 


,♦10 




3102 


014266 


004767 


002146 


JSR 


PC,9HLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


3103 












1 WRONG REMAINDER 


3104 


014272 


000350 




350 






3105 


U14274 


021527 


000267 


CMP 


(R5),«267 




3106 


014300 


001403 




BEQ 


,♦10 


;IF IN WRONG SEQUENCE GO TO THE HLT 


3107 


tol4302 


»04767 


002132 


JSR 


PC,SHLT 


jSEEN AN ERROR, GO TO TH HALT ROUTINE 


3108 












jTEST IS IN WRONG SEQUENCE 


3109 


014306 


000351 




351 






3U0 
3111 


014310 


005215 




INC 


(R5) 
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DIV INSTRUCTION TESTS 



3112 








3113 
















3 1 1 5 










014312 






3117 


014314 






3 1 1 8 




01 2704 




3 1 1 9 


^14322 


Qi 2705 




» ! 


014326 


g7 J 427 






014332 


1 06737 


VVVt 9 £ 


3123 








3123 


0143 36 






3124 


^14344 


00 1403 




3 1 25 


014346 


004767 




3126 








3127 


01 4332 


000352 




3128 








31 29 


014354 


022704 


040000 


31 3id 


s^l 4360 


001 403 




3131 


014362 


QSi 4767 




3132 








3133 


014 366 


90035 3 




3134 








3 1 3S 


014370 


022705 


000000 


3136 


»14374 


001403 




3137 


1^14376 


004767 


002036 


3138 








3139 


014402 


fc»003S4 




3140 


iiH4404 


010105 




3141 


3l44kJ6 


£i2l527 


000270 


3142 


«»14412 


001403 




3143 


1)14414 


004767 


002020 


3144 








3145 


014420 


000355 




3146 


014422 


i5052l5 




3147 









;TESTt270 
TST270I SCOPE 



DIV 100006 



»*»•*««»««««»#«••««««*«**««»*««»«#«»«« 

/ #2 ® 40000 REM 3 PS a 



MOV 


RSf Rl 


;SAVE RS 






















» 100l00l0f I 


|UWnU JjUW UnUbK WlJ,n 


00^ 


900 




DIV 


#2# %4 


• nTVTnp ftv a »i 
1 u J, V AyCi OX ? ^ 








MFPS 


w w r o wunu 










CMPB 


ffl3» Pf PBWUKD 


J la rS ® w 








BEQ 


a*10 










JSR 


PC f $hlt 


;SE£N AN ERRORi GO TO 


TH 


HALT 


ROUTINE 






|PS IS WRONG 








352 












CMP 


#40000r %4 


;IS QUOTIENT a 40000 








BEQ 


. + 10 










JSR 


PC,|HLT 


;S£EN AN ERROR, GO TO 


TH 


HALT 


ROUTINE 






iQUOTIENT IS WRONG 








353 












CMP 


#0»%44-l 


;IS REMAINDER s 








BEQ 


.♦10 










JSR 


PC,SHLT 


jSEEN AN ERROR, GO TO 


TH 


HALT 


ROUTINE 






;WRONG REMAINDER 








354 












MOV 


Rl,R5 


; RESTORE RS 








CMP 


(R5)#«270 










BEQ 


,♦10 


•IF IN WRONG SEQUENCE 


GO 


TO THE HLT 


JSR 


PC,SHLT 


;S£EN AN ERROR, GO TO 


IH 


HALT 


ROUTINE 






.TEST IS IN WRONG SEQUENCE 




355 












INC 


CR5) 











177777 
077777 
177776 
000432 

000000 000432 
001756 



DFKACA MACYll 30(1046) 04-AUG-77 
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3148 
3149 
3150 
3151 

3152 C14424 010701 

3153 fol4426 0127^0 

3154 ^14432 &12701 

3155 014436 071027 

3156 014442 106737 
3157 

3158 B14446 122737 

3159 014454 001403 

3160 t'14456 004767 
3161 

3162 
3163 

3164 f)l4464 022700 

3165 »14470 001403 

3166 i>14472 004767 
3167 

3168 
3169 

3170 014500 022701 

3171 014504 001403 

3172 014506 004767 
3173 

3174 014512 000360 

3175 014514 021527 

3176 {J14520 001403 

3177 1^14522 004767 
3178 

3179 014526 000361 

3180 014530 005215 
3181 



014462 000356 



014476 000357 



001742 

177777 
001726 

000271 
001712 
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|TEST|271 DIV 177777 77777 / #177776 a 40000 REM s 1777 

I •*«««•«*«««*»«•««««»«««*»«««««»**««*«»«««««»««««*»*»***««««*»*«*«««« 



TST271I SCOPE 
MOV 
MOV 
DIV 
MFPS 

CMPB 

BEQ 

JSR 



CMP 
BEQ 
JSR 



CMP 

BEQ 
JSR 

360 
CMP 
BEQ 
JSP 

361 
INC 



S177777,%0 
I(77777#%0*1 
#177776, %0 

PtPSWORD 

|0,9#PSWORD 

,♦10 

PC,SHLT 



140000, %0 

,♦10 

PC,$HLT 



#177777, %0+l 

.♦10 

PC,$HLT 



(R5),t271 

.♦10 
PC,|HLT 



jLOAD HIGH ORDER WITH 177777 
jLOAD LOW ORDER WITH 77777 
jDIVIDE BY #177776 
;SAVE PS 

•IS PS s 

•SEEN AN ERROR, GO TO TH HALT ROUTINE 
;P5 IS WRONG 



;IS QUOTIENT a 40000 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
jQUOTIENT IS WRONG 



jIS REMAINDER = 177777 

fSEEN AN ERROR, GO TO TH HALT ROUTINE 
; WRONG REMAINDER 



;IF IN WRONG SEQUENCE GO TO THE HLT 
;SEEN AN ERROR, GO TO TH HALT ROUTINE 
{TEST IS IN WRONG SEQUENCE 



DFKACA.SRC l@«.N0V«75 00100 
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3192 
3183 
3184 
3183 
31S6 
3187 
3188 
3189 
3190 
3191 
3192 
3193 
3194 
3195 
3196 
3197 
3198 
3199 
3200 
3201 
3202 
3203 
3204 
320S 
3206 
3207 
3208 
3209 
3210 
3211 
32U 
3213 
3214 
3215 



^14372 
tM4576 
1914600 



014606 
Kil4612 
314614 

014620 
014622 
014626 
§14630 

014634 
814636 



014532 010701 

014534 #12732 

0H540 012703 052525 

014S44 071227 053525 

014550 106737 000432 

014554 122737 000000 000432 

DH562 001403 

014564 004767 001650 

014S70 000362 



022702 000001 
001403 

004767 001634 



ITESTI272 

TST272I SCOPE 
MOV 
MOV 
DIV 
MFPS 

CMPB 

BEQ 

J5R 



CMP 

BEO 
JSR 



DIV 52525 / #§2525 s I REM ® PS a 



014604 000363 



022703 
001 4id3 
004767 001620 

000364 

021527 000272 
001403 

004767 001604 

000365 
005215 



CMP 
BEQ 
JSR 

364 

CMP 
BEQ 
JSR 

365 
INC 



t0«%2 

I52525f%2+1 

952S25r%2 

@#PSWORD 

#0,P#PSWORD 

.♦10 

PC,SHLT 



tl,%2 
.♦10 

PC,$HLT 



»0r%24-i 

9 + i0 

PC,SHLT 



(R5),#272 

,♦10 

PC,SHLT 



;LOAD HIGH ORDER MITH 
fLOAO LOM ORDER WITH S2S25 
IDIVIOE BY #52525 
;SAVE PS 

f IS PS a 

ISEEN AN ERROR, GO TO TH HALT ROUTINE 
|PS IS WRONG 



J IS QUOTIENT a I 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
jQUOTIENT IS WRONG 



;IS REMAINDER s 

jSEEN AN ERROR, GO TO TH HALT ROUTINE 
I WRONG REMAINDER 



;ir IN WRONG SEQUENCE GO TO THE HLT 
;SEEN AN ERROR, GO TO TH HALT ROUTINE 
;T£ST IS IN WRONG SEQUENCE 
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FKACA, 


,SRC 18 


..NOV-75 


00100 




DIV INSTRUCTION 


TESTS 




3216 










1 *»*««««•»»«#»«»•»»»«»««»««»««*«#««««#*«««»*»*«*«*««•»«•««««««*»***«* 


3217 










|TEST|273 


DIV 77777 


/ »0 B DUMMY REM a DUMMY PS 


3218 










1 »«*»««»»•*«»« ««««««»»»««»«»««**«tt*»»»*#***«»«*«»«#**««««»«tt*»«**#tt«« 


3219 
















3220 


014640 


010701 






TST273t SCOPE 






3221 


U14642 


B10501 






MOV 


R5,Pl 


J SAVE R5 


3222 


S?14644 


912704 


000000 




MOV 


»0,%4 


;LOAD HIGH ORDER WITH 


3223 


»:)14650 


W12705 


077777 




MOV 


#77777, %4+l 


jLOAD LOW ORDER WITH 77777 


3224 


^.14654 


071427 


000000 




DIV 


«0,%4 


•DIVIDE BY #0 


3225 


K 14660 


106737 


000432 




MFPS 


i#P5W0RD 


;SAVE PS 


3226 


^14664 


042737 


000014 


000432 


BIC 


«14,@«PSW0RD 




3227 
















3228 


!314672 


122737 


000003 


000432 


CMPB 


#3,@#PSW0RD 


} IS PS 8 3 


3229 


014700 


001403 






BEQ 


,♦10 




3230 


^14702 


004767 


001532 




JSR 


PC,$HLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


3231 














;PS IS WRONG 


3232 


014706 


000366 






366 






3233 
















3234 


&14710 


010105 






MOV 


R1,R5 


; RESTORE R5 


3235 


014712 


071527 


000273 




CMP 


CR5),#273 




3236 


K14716 


001403 






BEQ 


.♦10 


;ir IN WRONG SEQUENCE GO TO THE HLT 


3237 


^14720 


004767 


001514 




JSR 


PC, $ HLT 


J SEEN AN ERROR, GO TO TH HALT ROUTINE 


3238 














;TEST IS IN WRONG SEQUENCE 


3239 


(^1 4724 


000367 






367 






3240 


014726 


005215 






INC 


(R5) 




3241 
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3242 
3243 
3244 
3245 
3246 
3247 
3248 
3249 
3250 
3251 
3252 
32S3 
3254 
3295 
3256 
3257 
3258 
3259 
3260 
3261 
3262 
3263 
3264 
3265 



9t4730 010701 

St4732 012700 077777 

#14736 012701 177777 

014742 071027 000002 

S14746 106737 000432 

014752 042737 000014 000432 

®14760 122737 000002 000432 

014766 001403 

014770 004767 001444 

014774 000370 



ei4776 
015002 
015004 

015010 
015012 



;»»»»###•#*##»»###»»»#»######♦*####»»♦#*»»#•#•»••»»»•*♦♦#•••»«#•#*#♦# 

»TEST|274 DIV 77777 177777 / #2 a DUMMY REM a DUMMY 

I »##»#»#•#»##«#*##»»######»»#♦*»»#»»»####♦###*##«##•«#*♦#•#»»##*•*»*» 

TST274I SCOPE 



021527 000274 
001403 

1^04767 001430 

000371 
005215 



MOV 

MOV 

DIV 

MFPS 

BIC 

CMPB 

BEQ 

JSR 

370 

CMP 
BEQ 
JSR 

371 

IHC 



#77777#%0 
#177777, %0#l 
• 2#%0 

9#PSM0RD 
#14,isPSW0RD 

#2,P#PSW0PD 
, + 10 
PC,8HLT 



(R5)#»274 
, + 10 
PC,$HLT 



;LOAD HIGH ORDER WITH 77777 
jLOAD LOW ORDER WITH 177777 
{DIVIDE BY #2 
jSAVE PS 



;SEEN AN ERROR, GO TO TH HALT ROUTINE 
;PS IS WRONG 



;IF IN WRONG SEQUENCE GO TO THE HLT 
;SEEN AN ERROR, GO TO TH HALT ROUTINE 
iTEST IS IN WRONG SEQUENCE 



CR5) 



) 
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3266 


015014 


012702 


000002 


MOV 


• 2,%2 




3267 


015020 


012703 


000474 


MOV 


#S9,%3 




3268 


015024 


012704 


000476 


MOV 


«S10,%4 




3269 














3270 










3271 








lTEST|275 


DIV 52525 


/ S9 a 25252 REM si PS s 


3272 








I »««»««•»«««*»«««»#*«»*««»»*«»*»*#««*««»***«*»««««»«««***««*«««««**«« 


3273 














3274 


CI15030 


010701 




TST275I SCOPE 






3275 


015032 


012700 


000000 


MOV 


10, %0 


;LOAD HIGH ORDER WITH 


3276 


015036 


012701 


052525 


MOV 


#52525, %0+l 


;LOAO LOW ORDER WITH 52525 


3277 


015042 


071067 


163426 


DIV 


S9,%0 


iDIVIDE BY S9 


3278 


^15046 


106737 


000432 


MFPS 


9#PSW0RD 


|SAVE PS 


3279 














3280 


015052 


122737 


000000 e 


J00432 CMPB 


«0,aSPSWORD 


jIS PS s 


3281 


015060 


001403 




BEQ 


,♦10 




3282 


015062 


004767 


001352 


JSR 


PC,8HLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


3283 












;PS IS WRONG 


3284 


015066 


000372 




372 






3285 














3286 


015070 


022700 


025252 


CMP 


»25252,%0 


;IS QUOTIENT s 25252 


3287 


015074 


001403 




BEQ 


,♦10 




3288 


015076 


004767 


001336 


JSR 


PC,$HLT 


jSEEN AN ERROR, GO TO TH HALT ROUTINE 


3289 










jQUOTlENT IS WRONG 


3290 


015102 


000373 




373 






3291 














3292 


915104 


022701 


000001 


CMP 


#1,%0+1 


;IS REMAINDER a i 


3293 


015110 


001403 




BEQ 


, + 10 




3294 


015112 


004767 


001322 


JSR 


PC,$HLT 


jSEEN AN ERROR, GO TO TH HALT ROUTINE 


3295 










{WRONG REMAINDER 


3296 


015116 


000374 




374 






3297 


015120 


021527 


000275 


CMP 


(R5),#275 




3298 


015124 


001403 




BEQ 


,♦10 


{IF IN WRONG SEQUENCE GO TO THE HLT 


3299 


015126 


004767 


001306 


JSR 


PC,8HLT 


•SEEN AN ERROR, GO TO TH HALT ROUTINE 


3300 








{TEST IS IN WRONG SEQUENCE 


3301 


015132 


000375 




375 






3302 


015134 


005215 




INC 


tR5) 





'9 



3303 
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304 










305 








|TEST|276 


DIV 52 


306 








1 


307 












308 


01S136 


010701 




TST276I SCOPE 




309 


^15140 


012700 


000000 


MOV 


«0f%0 


310 


015144 


012701 


052525 


MOV 


»52525»%0+i 


311 


@151S0 


071077 


163322 


DIV 


0S10,%0 


312 


U15154 


106737 


000432 


MFPS 


i#PSV^ORD 


313 












314 


015160 


122737 


000000 i 


500432 CMPB 


lf0,9»PSWORD 


315 


Sil5l66 


001403 




BEQ 


, + 10 


316 


015170 


004767 


001244 


JSR 


PC,SHLT 


317 












318 


015174 


£»00376 




376 




319 












320 


&15176 


022700 


025252 


CMP 


#25252»%0 


321 


&15202 


001403 




BEQ 


,♦10 


322 


015204 


004767 


001230 


JSR 


PC,$HLT 


323 












324 


P15210 


000377 




377 




325 












326 


015212 


022701 


000001 


CMP 


»1,%0+1 


^27 


III15216 


001403 




BEQ 


,♦10 


328 


015220 


004767 


001214 


JSR 


PC,8HLT 


329 












330 


1715224 


000400 




400 




331 


tfl5226 


021527 


000276 


CMP 


(R5),#276 


332 


015232 


001403 




BEQ 


, + 10 


333 


k<>l5234 


004767 


001200 


JSR 


PC,8HLT 


334 












335 


&15240 


000401 




401 




336 


K15242 


005215 




INC 


CR5) 


337 













/ @S10 B 2S252 



;LOAD HIGH ORDER MITH 
;LOAD LOW ORDER WITH S2525 
iDIVIOE 8Y iS10 
7SAVE PS 

•IS PS » 

;SEEN AN ERRORy GO TO TH HALT ROUTINE 
;PS IS WRONG 



;IS QUOTIENT a 25252 



iSEEN AN ERROR, GO TO TH HALT ROUTINE 
{QUOTIENT IS WRONG 



;IS REMAINDER 



;SEEN AN ERROR, GO TO TH HALT ROUTINE 
;HROhG REMAINDER 



;ir IN WRONG SEQUENCE GO TO THE HLT 
•SEEN AN ERROR, GO TO TH HALT ROUTINE 
I TEST IS IN WRONG SEQUENCE 
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3338 










3339 








|TEST|277 


DIV 52525 


/ 9#S9 » 25252 REM 8 1 PS a 


3340 










3341 
3342 


015244 


010701 




TST277I SCOPE 






3343 


&15246 


012700 


000000 


MOV 


#0,%0 


;LOAD HIGH ORDER WITH 


3344 


015252 


012701 


052525 


MOV 


#52525»%0+l 


;LOAD LOW ORDER WITH 52525 


3345 


1^15256 


671037 


000474 


DIV 


9tS9,%0 


^DIVIDE BY 9IS9 


3346 


&15262 


106737 


000432 


MFPS 


e#PSWORD 


;SAVE PS 


3347 














3348 


015266 


122737 


000000 


00432 CMPB 


#0,9»PSWORD 


;IS PS = 


3349 


1/15274 


001403 




BEQ 


, + l0 




3350 


015276 


004767 


001136 


JSR 


PC,8HLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


3351 












;PS IS WRONG 


3352 


k;15302 


000402 




402 






3353 














3354 


015304 


022700 


025252 


CMP 


»25252»%0 


;IS QUOTIENT a 25252 


3355 


315310 


001403 




BEQ 


, + 10 




3356 


015312 


004767 


001122 


JSR 


PC,$HLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


3357 












{QUOTIENT IS WRONG 


3358 


el5316 


000403 




403 






3359 














3360 


015320 


022701 


000001 


CMP 


»1,%0+1 


;IS REMAINDER » 1 


3361 


ijl5324 


001403 




BEQ 


, + 10 




3362 


015326 


004767 


00110^ 


JSR 


PCSHLT 


•SEEN AN ERROR, GO TO TH HALT ROUTINE 


3363 












{WRONG REMAINDER 


3364 


015332 


000404 




404 






3365 


015334 


021527 


000277 


CMP 


(R5),»277 




3366 


015340 


001403 




BEQ 


, + l0 


;IF IN WRONG SEQUENCE GO TO THE HLT 


3367 


015342 


004767 


001072 


JSR 


PC,8HLT 


iSEEN AN ERROR, GO TO TH HALT ROUTINE 


3368 












{TEST IS IN WRONG SEQUENCE 


3369 


015346 


000405 




405 






3370 


015350 


005215 




INC 


(R5) 




3371 
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3372 








1 


3373 








f TiST|300 


DIV 92! 


3374 










3375 












3376 


_ 

015352 


010701 




to t 3tlv » OWwrCa 




3377 


i^l 53S4 


nt 'il OkOk 




MOV 


#0« %0 


3378 


1915360 


01 2701 




MOV 




3379 


01 5 36 4 


07 1002 






%2r %0 


3380 


91 3366 


1 06737 


000432 


MFPS 




3381 












3382 


015372 


1 227 37 








3383 


#1 5400 


001 403 








3364 


#15402 


004767 








3385 












3386 


©1 5406 






406 




3387 












3388 


015 410 


/'4 *1 1 *f a ^ 


025252 


_„p 




3389 


015414 


001 403 




Rro 


9*i0 


*f ft? 


@1S416 


004767 




IfflO 




3391 












3392 




_ 

000407 




407 




3393 












3394 


015424 


022701 


000001 


CMP 


#1#%0^1 


339S 


315430 


001403 




BEQ 


.•MS 


3396 


015432 


S?04767 


001002 


JSR 


PC,|HiT 


3397 












3398 


015436 


000410 




410 




3399 


ill5440 


021527 


000300 


CMP 


(R5),#300 


3400 


S»15444 


001403 




BEQ 


, + 10 


3401 


»I15446 


004767 


000766 


JSR 


PC,SHLT 


3402 












3403 


U15452 


000411 




411 




3404 


015454 


005215 




INC 


CR5) 


3405 













/ %2 B 25252 



REM 



iLOAO HIGH ORDER WITH 
iLOAD LOW ORDER WITH 52525 
jDIVIDE B¥ %2 
I SAVE PS 

lis PS a 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
;PS IS WRONG 



;IS QUOTIENT s 25252 

iSEEN AN ERROR, GO TO TH HALT ROUTINE 
J QUOTIENT IS WRONG 



;IS REMAINDER s i 

jSEEN AN ERROR, GO TO TH HALT ROUTINE 
;HRONG REMAINDER 



;IF IN WRONG SEQUENCE GO TO THE HLT 
;SEEN AN ERROR, GO TO TH HALT ROUTINE 
;TE5T IS IN WRONG SEQUENCE 
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3406 








<*««««««»»«««»«««»»«*»««»»««*««««*«««»»«»»«««»«*•»«««»««**«»*«*««»»«* 


3407 








jTE5Ti301 


DIV 52525 


/ CS)* = 25252 REM a I PS a 


3408 








1 »##«###»»«###»#####»»#»#»#•»##«#»##»♦**«##»#♦#*#»»**«##*»»♦#»#*»###* 


3409 














3410 


015456 


010701 




TST301I SCOPE 






3411 


015460 


f^l2700 


000000 


MOV 


«0,%0 


;LOAD HIGH ORDER WITH 


3412 


015464 


012701 


052525 


MOV 


»52525#%0+l 


;LOAD LOW ORDER WITH 52525 


3413 


£»15470 


071023 




DIV 


(3)+,%0 


jDIVIDE i¥ (3)+ 


3414 


015472 


106737 


000432 


MFPS 


PtPSWoRD 


;SAVE PS 


3415 














3416 


015476 


122737 


000000 (t 


J00432 CMPB 


10, a«PSWORD 


y IS PS a 


3417 


015504 


001403 




BEQ 


,♦10 




3418 


!ifl5506 


B04767 


000726 


JSR 


PCSHLT 


•SEEN AN ERROR, GO TO TH HALT ROUTINE 


3419 












;PS IS WRONG 


3420 


015512 


000412 




412 






3421 














3422 


015514 


022700 


025252 


CMP 


#25253, %0 


?I5 QUOTIENT s 25252 


3423 


015520 


001403 




BEQ 


,*10 




3424 


015522 


004767 


000712 


JSR 


PCSHLT 


iSEEN AN ERROR, GO TO TH HALT ROUTINE 


3425 












^QUOTIENT IS WRONG 


3426 


015526 


000413 




413 






3427 














3428 


015530 


022701 


000001 


CMP 


81,%0<»-1 


;IS REMAINDER » 1 


3429 


015534 


001403 




BEQ 


.♦10 




3430 


015536 


004767 


000676 


JSR 


PC,$HLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


3431 












;WRONG REMAINDER 


3432 


S15542 


000414 




414 






3433 


015544 


021527 


000301 


CMP 


(R5),i30l 




3434 


015550 


001403 




BEQ 


B + 10 


;IF IN WRONG SEQUENCE GO TO THE HLT 


3435 


015552 


004767 


000662 


JSR 


PC,$HLT 


iSEEN AN ERROR, GO TO TH HALT ROUTINE 


3436 










;TEST IS IN WRONG SEQUENCE 


3437 


015556 


000415 




415 






3438 


015560 


005215 




INC 


(R5) 




3439 
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3440 
344i 
3442 
3443 
3441 
3445 
3446 
3447 
3146 
1449 
3450 
3451 
3452 
3453 
3454 
3455 
3456 
3457 
3458 
3459 
3460 
3461 
3462 
3463 
3464 
3465 
3466 
3467 
3468 
3469 
3470 
3471 
3472 
3473 



, )*»•»«*«*•«»«»«»«»»»««»«»•««*«««««•*«««»«*«*»»»*«#«*««**««»»*»««««««• 

|TEST|303 DIV 33S29 / »(3} a 25292 REM at PS e 



015620 
^15624 
k>l5626 



^tS562 010701 

013S64 012700 

015570 012701 05232S 

015574 071043 

1^15376 106737 000432 

015602 122737 000000 000432 

015610 001403 

^15612 004767 000622 

015616 000416 



^22700 02S2S2 
001403 

004767 000606 



W15632 000417 



015634 
^15640 
1^15642 

@15646 
»15650 
015654 
0156S6 

615662 
(»15664 



022701 
001403 

004767 000572 



000420 
021527 

001403 
fe04767 

000421 
©05215 



000302 



TST302I SCOPE 
MOV 
MOV 
DIV 
MFPS 

CMPB 
BEO 

asR 



CMP 
BEG 



CMP 
BEQ 
JSR 

420 
CMP 
BEQ 
JSR 

421 
INC 



»0,%0 

#52S2S#%0+1 

««(33#%0 

l#PSWORD 

#0f f #PSWORD 

i-^10 

PCilHLT 



»2S252#%0 

,4-10 

PC,«HLT 



fflf%04-l 

,♦10 
PC,$HLT 



(RS)f #302 

9 + 10 

PC,$HLT 



iLOAD HIGH ORDER WITH 
|LOAD LOU ORDER WITH S3S2S 
, DIVIDE BY »C3) 
jSAVE PS 

;IS PS » 

;SEEN AN ERROR, GO TO TH HALT ROUTINE 
jPB IS WRONG 



lis QUOTIENT s 25252 

{SEEN AN ERROR, GO TO TH HALT ROUTINE 
^QUOTIENT IS WRONG 



lis REMAINDER a i 

I SEEN AN ERROR, GO TO TH HALT ROUTINE 
jWRONG REMAINDER 



;IF IN WRONG SEQUENCE GO TO THE HLT 
;SEEN AN ERROR, GO TO TH HALT ROUTINE 
iTEST IS IN WRONG SEQUENCE 
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DFKACAs 


, SRC I 


8«NOV<"75 


00100 




DIV INSTRUCTION 


TESTS 




3474 










1 «*«•«»««»«»«»««•««»«»•»***«»»««»»*»*#««**««««*»»*•«««»«#****««**«*«« 


3475 










?TEST|303 


DIV 52525 


/ 2(4) a 252S2 REM « 1 PS ■ 


3476 










J #**#»#»#»♦»»»»♦»#•#»»#»#»###♦#####»«#♦»##»*#####»»#####»»####*##«### 


3477 
















3478 


«J15666 


010701 






TST303I SCOPE 






3479 


fcl5670 


012700 


000000 




MOV 


• 0,%0 


jLOAD HIGH ORDER MITH 


3480 


015674 


012701 


052525 




MOV 


S52525»%0+1 


;LOAD LOW ORDER WITH 52525 


3481 


015700 


071064 


000002 




DIV 


2(4), %0 


IDIVIDE BY 2(4) 


3482 


015704 


106737 


000432 




MFPS 


f »PSWORD 


;SAVE PS 


3483 
3484 


015710 


J22737 


000000 00t 


5432 


CMPB 


t0,9«PSWORO 


J IS PS 8 


3485 


015716 


001403 






BEQ 


.•t-10 




3486 


H15720 


004767 


000514 




JSR 


PC,SHLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


3487 














|PS IS WRONG 


3468 


i»15724 


000422 






422 






3489 
















3490 


015726 


022700 


025252 




CMP 


#25252, %0 


;IS QUOTIENT ■ 25252 


3491 


015732 


001403 






BEQ 


, + 10 




3492 


015734 


004767 


000500 




JSR 


PCSHLT 


jSEEH AN ERROR, GO TO TH HALT ROUTINE 


3493 














{QUOTIENT IS WRONG 


3494 


JS15740 


000423 






423 






3495 
















3496 


015742 


022701 


000001 




CMP 


»1,%0+1 


fiS REMAINDER a 1 


3497 


®15746 


001403 






BEQ 


, + 10 




3498 


015730 


004767 


000464 




JSR 


PCSHLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


3499 












{WRONG REMAINDER 


3500 


015754 


000424 






424 






3501 


#15756 


021527 


000303 




CMP 


(RS),#303 




3502 


015762 


001403 






BEQ 


, + 10 


;IF IN WRONG SEQUENCE GO TO THE HLT 


3503 


0»5764 


004767 


000450 




JSR 


PCSHLT 


{SEEN AN ERROR, GO TO TH HALT ROUTINE 


3504 












{TEST IS IN WRONG SEQUENCE 


3505 


015770 


000425 






425 






3506 


015772 


005215 






INC 


CR5) 




3507 
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3508 








3S09 








3510 








3511 








3512 


01S774 


010701 




3S13 


®15776 


013700 


000000 


3514 


016002 


012701 


052525 


3515 


^16006 


071074 


000000 


3516 


§16012 


106737 


000432 


3517 








3518 


@16016 


122737 


000000 


3519 


016024 


001403 




3520 


§16026 


004767 


000406 


3521 








3522 


016032 


000426 




3523 








3524 


016034 


022700 


025252 


3525 


016040 


001403 




3526 


016042 


004767 


000372 


3527 








3528 


016046 


000427 




3529 








3530 


0160S0 


022701 


000001 


3531 


016054 


001403 




3532 


016056 


004767 


000356 


3533 








3534 


016062 


000430 




3535 


016064 


021527 


000304 


3536 


016070 


001403 




3537 


^16072 


004767 


000342 


3538 








3539 


016076 


000431 




3540 


016100 


005215 




3541 









;««•»«#«•••«»«»*«»*•««•«•*«»«**»»«•#*«»«*•««««*#•«««««#»*#»»*#»«»«*«« 

ITESTS304 DIV 52525 / 1(4) a 252S2 REM a 1 PS = 



;LOAD HIGH ORDER WITH 
}LOAO LOM ORDER WITH 52525 
iDIVIDE BY 9(4) 
;SAVE PS 



000432 



SCOPE 




MOV 


10, %0 






DIV 


9(4), %0 


MFPS 


eifPSWORD 


CMPB 




BEQ 


,+10 


JSR 


PCSHLT 


426 




CMP 


#25252#%0 


BEQ 


.♦10 


JSR 


PCSHLT 


427 




CMP 


#1,%04-1 


BEQ 


,♦10 


JSR 


PC,SHLT 


430 




CMP 


(R5},#304 


BEQ 


.♦10 


JSR 


PC,sHLT 


431 




INC 


(R5) 



J IS PS 



;SEEN AN ERROR, GO TO TH HALT ROUTINE 
;PS IS WRONG 



lis QUOTIENT s 25252 



;SEEN AN ERROR, GO TO TH HALT ROUTINE 
;QUOTIENT IS WRONG 



;IS REMAINDER s 1 



-SEEN AN ERROR, GO TO TH HALT ROUTINE 
jWRONG REMAINDER 



;IF IN WRONG SEQUENCE GO TO THE HLT 
I SEEN AN ERROR, GO TO TH HALT ROUTINE 
;TEST IS IN WRONG SEQUENCE 
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3542 








3543 








3544 








3545 








3546 


016102 


010701 




3547 


016104 


012700 


000000 


3548 


016110 


012701 


052525 


3549 


016114 


071034 




3550 


016116 


106737 


000432 


3551 








3552 


016122 


122737 


000000 


3553 


016130 


001403 




3554 


i^l6l32 


004767 


000302 


3555 








3556 


016136 


000432 




3557 








3558 


016140 


022700 


025252 


3559 


016144 


001403 




3560 


016146 


004767 


000266 


3561 








3562 


016152 


000433 




3563 








3564 


£116154 


022701 


000001 


3565 


i»16160 


001403 




3566 


016162 


004767 


000252 


3567 








3568 


016166 


000434 




3569 


016170 


021527 


000305 


3570 


016174 


001403 




3571 


&16176 


004767 


000236 


3572 








3573 


&16202 


000435 




3574 


016204 


005215 




3575 









I «#*«««*«»««»««•«•«««»«»«#»««*««««»«»««««»««»»«««««»*««»«««««»«»»««««« 

;TEST|305 DIV 52525 / 9(4)4- b 25252 REM si PS s 



;LOAD HIGH ORDER WITH 
|tOAO LOW ORDER WITH 52525 
^DIVIDE BY @(4)-»- 
;SAVE PS 



000432 



SCOPE 




MOV 


#0,t0 


MOV 


«52525»%0+l 


DIV 


9(4)+,%0 


MFPS 


e#PSWORD 


CMPB 


#0,9«PSHORD 


BEQ 


.♦10 


JSR 


PC,$HLT 


432 




CMP 


«25252,%0 


BEQ ^ 


, + 10 


JSR 


PC,$HLT 


433 




CMP 


»1,%0'(-1 


BEQ 


,♦10 


JSR 


PC,SHLT 


434 




CMP 


(R5),»305 


BEQ 


, + 10 


JSR 


PC,$HLT 


43S 




INC 


(R5) 



; IS PS a 

;5EEN AN ERROR, GO TO TH HALT ROUTINE 
|PS IS WRONG 



7 IS QUOTIENT » 25252 

ySEEN AN ERROR, GO TO TH HALT ROUTINE 
fQUOTIENT IS WRONG 



;IS REMAINDER a 1 

{SEEN AN ERROR, GO TO TH HALT ROUTINE 
iWRONG REMAINDER 



;IF IN WRONG SEQUENCE GO TO THE HLT 
;SEEN AN ERROR, GO TO TH HALT ROUTINE 
}TEST IS IN WRONG SEQUENCE 
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3576 








1 


3577 








rTEST|306 


DIV S2525 


/ i»(43 B 25252 REM si PS s 


3578 










3579 














3580 


016206 


010701 










3581 


&16210 


01 2700 


000000 


MOV 


90»%0 


;LOAO HIGH ORDER WITH 


3582 


016214 


01 2701 


052525 


MOV 




{LOAD LOW ORDER WITH 52525 


3583 


g| 5220 


07 1054 




DIV 


9»( 4} y %0 


^DIVIDE BY 8i®C4) 


3584 


016222 


106737 


000432 


MFPS 




;SAVE PS 


3585 














3586 


016226 


I 22737 


000000 000432 


CHPB 




7 IS PS s 


3587 


016234 


001 403 




BEQ 






3566 


016236 


004767 


43t(HC> 1 7 A 
V"V * f V 


JSR 


PC $HLT 




3569 














3590 


016242 


000436 




436 




3591 














3592 


016244 


022700 


025252 


QMP 


ff 25252f %0 


;IS QUOTIENT s 25252 


3593 


i}l 6250 


001 403 




BEQ 


• *10 




3594 


0162S2 


004767 


000162 


JSR 


PC, SHLT 


;SEEN AN ERROR, GO TO TH HALT ROUTINE 


3595 












{QUOTIENT IS WRONG 


3596 


016256 


000437 




437 






3597 














3598 


016260 


022701 


000001 


CMP 


»1,%0+1 


;IS REMAINDER & 1 


3599 


016264 


001403 




BEQ 


,♦10 




3600 


016266 


004767 


000146 


JSR 


PC, SHLT 


{SEEN AN ERROR, GO TO TH HALT ROUTINE 


3601 












{WRONG REMAINDER 


3602 


016272 


000440 




440 






3603 


Itn6274 


021527 


000306 


CMP 


(R5),#306 




3604 


316300 


001403 




BEQ 


,♦10 


{IF IN WRONG SEQUENCE GO TO THE HLT 


3605 


016302 


004767 


000132 


JSR 


PC,$HLT 


{SEEN AN ERROR, GO TO TH HALT ROUTINE 


3606 












{TEST IS IN WRONG SEQUENCE 


3607 


016306 


000441 




441 






3606 


»16310 


005215 




INC 


(R5) 




3609 
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3610 










{«*«*•«»*«««*««»*»««*»««*»« 


3611 


















3612 










,SBTTL 


END OF 


PASS ROUTINE 




3613 


















3614 










{•INCREMENT THE 


PASS NUMBER 


($PASS) 


3615 










J»TYPE 


"END PASS" 




3616 










{«IF THERES A MONITOR GO TO 


IT 


3617 










{«IF THERE ISN» 


T JUMP TO BEGIN 


3618 










{«IF IT 


IS DESIRED TO HAVE A 


BELL INDICATE THE "END OF PASS" LOCATION 


3619 










{#8ENDMG CAN BE 


CHANGED TO 7 




3620 
3621 


016312 








SEOPI 








3622 


&16312 


010701 








SCOPE 






3623 


016314 


005267 


162066 






INC 


IPASS 


{{INCREMENT THE PASS NUMBER 


3624 


&16320 


042767 


100000 


J.62060 




BIC 


$100000, 8PASS {{DON'T ALLOW A NEG, NUMBER 


3625 


016326 


005327 








DEC 


CPC)f 


{{LOOP? 


3626 


016330 


000001 






SEOPCTI 


.WORD 


1 




3627 


016332 


003015 








BGT 


8D0AGN 


{{YES 


3628 


016334 


012737 








MOV 


(PC)+,9(PCjt 


{{RESTORE COUNTER 


3629 


016336 


000001 






8ENDCTI 


.WORD 


1 




3630 


016340 


ei6330 








8E0PCT 






3631 


1^16342 


000004 


016372 






TYPE 


,$ENDMG 


{{TYPE "END PASS" 


3632 


016346 








$GET42I 








3633 


















3634 


816346 


013700 


000042 






MOV 


9#42fR0 


{{GET MONITOR ADDRESS 


3635 


016352 


001405 








BEQ 


$DOAGN 


{{BRANCH IF NO MONITOR 


3636 


016354 


000005 








RESET 




{{CLEAR THE WORLD 


3637 


£16356 


004710 






$ENDADl 


JSR 


PC,CR0) 


{{GO TO MONITOR 


3638 


016360 


000240 








NOP 




{{SAVE ROOM 


3639 


016362 


000240 








NOP 




{{FOR 


3640 


016364 


000240 








NOP 




{fACTll 


3641 


016366 








SDOAGNS 








3642 


016366 


000137 


000600 






JMP 


@#BEGIN 


{{RETURN 


3643 


016372 


005015 


047105 


020104 


SENDMGl 


.ASCII 


<15><12>/END 


PASS/ 


3644 


016400 


040520 


051523 












3645 


016404 


377 


377 


000 


SENULLI 


• BYTE 


«l,«l,0 


{fNULL CHARACTER STRING 


3646 




016410 








.EVEN 






3647 


















3648 


016336 


000400 






ENDCTi 


400 






3649 


















3650 


















3651 












3652 


















3653 










.SBTTL 


POWER FAIL ROUTINE 




3654 


















3655 


016410 


012737 


016420 


000024 


$PWRDNI 


MOV 


#$PWRUP»@»24 




3656 


016416 


000000 








HALT 






3657 


















3658 


016420 


012706 


000600 




iPWRUPI 


MOV 


«BEGIN,SP 


{RESTORE THE SP 


3659 


e»16424 


012737 


016410 


000024 




MOV 


#$PWRDN,9#24 




3660 


016432 


000004 


000522 






TYPE 


, POWER 


{GO AND TYPE "POWER" 


3661 


016436 


000753 








BR 


SDOAGN 





OFKSCAsSRC |@»N0V«7S @0|00 HALT ROUTINE 



3662 












3$d3 










1* 


3664 










I* 


366S 










1* 


3666 










1* 


3667 










>« 


I66i 










,# 


3669 












3670 


016440 


017637 


000000 


000402 


SHLTI 


3671 


il6446 


S32777 


020000 


162036 




3672 


0164S4 


001046 








3673 


il64§6 


^00004 


000514 






3674 


§16462 


010046 








S67S 


tl6464 


112767 


000002 


1617S7 




3676 


016472 


016600 


000002 






3677 


©16476 


162700 


000004 






3678 


@16S02 


1 12737 


000006 


000430 


2IS 


3679 


916S10 


00S046 








3680 


616312 


000241 






4SS 


3691 


il6514 


006100 








3683 


1^16516 


006116 








3683 


016520 


052716 


000060 






3684 


016524 


004767 


000130 






368S 


@16S30 


005016 








3686 


016332 


006100 








3687 


§16534 


006116 








3688 


tl6S36 


006100 








3689 


916940 


006116 








3690 


016342 


10S3o7 


161702 






3691 


016S46 


001361 








3692 


1^16390 


005726 








3693 


^16552 


017600 


000002 






3694 


il6336 


000004 


000516 






369S 


©16562 


105367 


161663 






3696 


016366 


001345 








3697 


il6370 


012600 








3698 


016572 


103767 


161622 




611 


3699 


@16S?6 


001403 








3700 


016600 


003237 


000400 






3701 


&16604 


000777 








3702 


016606 


005777 


161670 




SSI 


3703 


^16612 


100001 








3704 


#16614 


000000 








3705 


016616 


062716 


000002 




1011 


3706 


616622 


000207 









nkhf ROUTINE 



PROGRAM 


COMES HERE 


MOV 


|(SP},9#$rA 


BIT 


9200001 I^SWR 


BNE 


61 


TYPE 


fSCRLr 


MOV 


R0f »(SP) 


MOVB 


#2#8TPCNT 


MOV 


2(SP},R0 


SUB 


«4,R0 


HOVB 


S6,i«TYPCNT 


CLR 


«(SP) 


CLC 




ROL 


R0 


ROL 


(SP) 


BIS 


#60f (SP) 


J8R 


pc,stpchr 


CLR 


(SP) 


ROL 


R0 


ROL 


CSP) 


ROL 


R0 


ROL 


(SP) 


DEC6 


typcnt 


BNE 


4S 


TST 


(5P)t 


>40V 


i2(SP)|R0 


TYPE 


,SCRLF+2 


DECB 


itpcnt 


BNE 


28 


MOV 


CSP)+,R0 


TSTB 


gENV 


BEQ 


8$ 


INC 


f ismsgty 


BR 




TST 


ISWR |IS 


BPL 


10$ 


HALT 




ADD 


12, (SP) 


RTS 


PC 



|(SP},9#$rATAL ;PLACE THE ERROR NUMBER AT LOCATION 8FATAL 

I HAS THE OPERATOR ASKED TO SUPRE5S ERROR TYPE OUTS 

|G0 AND TYPE A CR, LF, FOLLOWED BY 3 SPACES 
iSAVE R0 

lALLOW TYPE OUTS Of PC AND ERROR NUMBER 
IBRING THE RETURN PC IN R0 

lALLOW TYPE OUT Of 6 DIGITS 



iBRiNG THE C BIT FROM R0 IN (SP 

iPREPARE TO TYPE IT OUT 

|AND GO TO OUT PUT A CHARACTER 



;HAS ALL THE SIX CHARACTERS BEEN TYPED 7 

;ir NOT THEN REPEAT FROM 4$ 

, RESTORE STACK POINTER 

iPREPARE TO OUT pUT THE ERROR NUMBER 

;G0 AND TYPE 3 SPACES 

I IF BOTH PC AND ERROR NUMBER HAS NOT BEEN 
iREPORTEO THEN REPEAT FROM 2$ 
; RESTORE R0 

;IF WE ARE NOT UNDER APT, THEN GO TO 
y8$ 

lOTHERWiSE INFORM APT, ABOUT SEEING THE ERROR 
;AND LOOP 
IT REQUIRED TO HALT ON ERROR ? 
;IF NOT THEN GO TO 10$ 

^ADJUST THE RETURN ADDRESS 
jAND RETURN 
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DFKACA, 


SRC I 


3«NOV«75 


00100 




ASCIZ 


TYPE OUT ROUTINE 


3707 
















3708 










l« 


TYPE 


OUT ROUTINE 


3709 










J* 






3710 










1* 






3711 










l» 






3712 










l» 


THIS 


ROUTINE IS USED 


3713 
















3714 
















3715 


016624 


010046 






$TYPE| 


MOV 


P0,»(SP) 


3716 


016626 


£117600 


000002 






MOV 


92(SP),R0 


3717 


016632 


1 12046 






2$i 


MOVB 


CR0)+,«(SP) 


3718 


016634 


001005 








BNE 


48 


3719 


016636 


005726 








TST 


(SP) + 


3720 


016640 


012600 








MOV 


(SP)*,R0 


3721 


016642 


062716 


000002 




3$l 


ADD 


12, (SP) 


3722 


016646 


000002 








RTI 




3723 
















3724 


016650 


004767 


000004 




4St 


JSR 


PC,8TPCHR 


3725 


016654 


005726 








TST 


(SP) + 


3726 


016656 


000765 








BR 


38 


3727 
















3728 


016660 


132737 


000040 


000421 


8TPCHR 


$ BITB 


#40,9»$ENVM 


3729 


016666 


{^01006 








BNE 


48 


3730 


016673 


105777 


161616 




2$l 


TSTB 


8$TPS 


3731 


016674 


100375 








BPL 


28 


3732 


016676 


116677 


000002 


161604 




MOVB 


2(SP),98TPB 


3733 


016704 


000307 






481 


RTS 


PC 


3734 




&00001 






,END 







jSAVE R0 

jGET THE ADDRESS OF THE ASSCIZ STRING 
yPUSH THE CHARACTER TO BE TYPED ONTO STACK 
^BRANCH IF IT IS NOT THE TERMINATOR 

jOTHERWiSE RESTORE THE STACK AND R0 
jADJUST THE RETURN PC 
;AND RETURN 

;G0 TO TYPE A CHARACTER 
yRESTORE THE STACK POINTER 
|AND RETURN TO 2$ 

^HAS THE CONSOLE OUTPUTS BEEN SUPPRESSED? 
ylF SO THEN RETURN FROM THE SUBROUTINE VIA 48 
;IS THE PRINTER AVAILABLE? 
J IF NOT THEN LOOP HERE 
yOUT PUT THE CHARACTER 
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A s 


016419 






TBX* J 


ABASE B 


000000 


DUMMY ^ 




TST164 


ACDVI| a 


000000 


ENDCT 


016336 


TS71 65 


ACDW2 s 




ENTl 76 




TSTl 66 


ACPUOPs 


000000 


ENT5 % 




TSTl 67 


ADDW0 s 


000000 


EHKNM s 


000442 


TSTl 70 


ADOW| a 


000000 


f S 


000063 


loll f I 


ADDW108 


000000 


N s 


000307 


T0TI72 


ADDWl la 


©00000 


NEGAT 


002062 


TST173 


ADDWl 28 


@00000 


POMER 


000322 




ADDWl 


000000 


PSWORD 


000432 


Toll 75 


ADDWl 4s 


|j»00000 


REG01 


003S04 


TBTl 76 


ADDW|Ss 


000000 


REGl 


001 102 


IBT177 


ADDiN2 s 


1100000 


REG2 


001244 


TST200 


ADDW3 m 


000000 


REG23 


003706 


1O1201 


ADDW4 SI 


@00000 


REG3 


001 406 


TST202 


ADDW3 s 


000000 


REG4 


001546 


TST203 


ADDW6 s 


000000 




004104 


TST204 


ADDW7 s 


#00000 


REv»5 


00i 7 1 2 




ADDW@ 8 


000000 


RESTRT 


a a M ■} o 7 


TST206 


ADDW9 a 


000000 




004312 




ADEVCTs 


£#00000 


SCOPE ]s 


010701 


TST2 1 


ADEVH s 


000000 


ABIT 1 ta 




is 1 


AENV s 


000000 


5C0PE3a 


n\ a ■) a 3 


TST2 1 2 


AENVM a 


000000 


START 


AMial AM 

ysv'o f % w 


TST2 1 3 


AFATAliS 


000000 


gWR 


000502 


T01214 


AMADP I s 


00000y) 




0001 76 


TST2 1 S 


AMADB2'* 




SW09 3 


001000 


TST2 I 6 


AMADP38 


000000 


SWl 8 


002000 


lolix 1 


AMADBia 


^00000 


SWl 1 a 


004000 


TST220 


AMANSla 


900000 


SW12 a 


010000 




AMA^SS^ 


^00000 


S0 


000452 




AMAMgja 


^00000 


SI 


000454 




AMAHS4a 


300000 


S10 


000476 


10I224 


AMfiGADa 


000000 


SI I 


000500 


Td1225 


AMSGLGs 


900000 


S2 


000456 


1 1220 


AMSGT Ys 


1)00000 


S3 


019040 to 


T5T227 


AMTYP18 


1^00000 


S4 


000462 


TaX2 J0 


AMXYP2* 


000000 


S5 


000464 




AMTYPJa 


000000 


S6 


000466 


TST232 


AMTYP4S 


000000 


S7 


000470 


TST233 


APASS 8 




S8 


000472 


TST234 


APRIORs 


300000 


S9 


000474 


T5T235 


ASWPEGs 


^00000 


TEMPI 


000434 


TST236 


ATESTNa 


000000 


TEMP2 


000436 


T5T237 


AUNIT 8 


000000 


TEMP3 


000440 


TST240 


AU5WB a 


000000 


TEMP4 


000442 


TST241 


AVECris 


000000 


TEMP5 


000444 


TST242 


AVECT2S 


^00000 


TEMP6 


000446 


TST243 


BEGIN 


!900600 


TST160 


004346 


TSI244 


COUNT 


000430 


TST161 


004374 


TST245 


DISFtR 


000504 


TSTi62 


004412 


TST246 


, ABS, 


016706 


00 









TST247 


012120 


TTYOUT 


000306 


004472 


TST250 


012212 


typcnt 


000450 


0045 30 


TST2S 1 


012306 


TYPl a 


000004 


004534 


TST252 


012402 


gAPTHD 


000410 




TST253 


012474 


SCPUOP 


000426 


004642 


TST2S4 




$CRLif 


0005|4 


004666 






IDiVCT 


000410 


0047 1 4 


TST256 




lOOAGN 


016366 


00,4736 


loT2ar 


013114 


$£NDAD 


0163S6 


00477 4 


Tul 20V 




lENDCT 


016336 


00S030 


X3T2DI 


01 3330. 


$ENDMG 


016372 


005106 


To 1.202 


013442 






005202 


TST26 3 




|ENV 


10iOW9 Aw 


005276 


TST264 




gENVM 


00042 1 


0^5376 


TST365 




$EOP 


016312 


005472 


TST266 


at A^ a& 


lEOPCT 


016330 


005566 


TST267 


aI? 9 


lETABL 


aaaA'sa 


00S666 


TST270 




SETEND 






TST27 1 


014424 


SFAtAli 


w vs; ^ V A 


Bwo 1 wo 


TST272 


014532 


$GET42 


016346 


»0O 4! t K> 


TST273 


014640 


$HD » 


£1000103 

vvvVv '# 




TST274 


014730 


8HXBTS 


000430 


006414 


TST275 


015030 


SHliT 


016440 




TST276 


015136 


$MAIli 


000400 


0066 1 4 


TST277 


015244 


SMBA'DR 


000432 


0067 1 4 


TST300 


015352 


$MSGAD 




00701 6 


T ST 301 


015456 


$MSGLG 


1019104 i w 


007 120 


TST302 


1 55 6 2 


$MS&TY 


1010 V "VVV 


007220 


TST303 


015666 


SPASS 


aaa Aa& 

19 10104100 


007320 




015774 


$PASTM 


ana A )i« 

I0I0I04JW 




TST305 




$PWRDN 


016410 


007510 


f Ol J0D 


01620O 


SPWRUP 


016420 


007604 


m e np 9 1 




fiRE't'UPa 

V 0£i A U r w 


a M Gl fli 01 
10101010 A» 


007704 


TST40 




fSTUP 8 


177777 


01 0000 


IOi4l 


VV)£ 1 0» 


$SVPC s) 


an 4 aau 


01 0074 


TST42 




ISWK s 


4 fiUaAn 

I oVWV 


010174 


TST43 


002232 


SSWREG 


000422 


010270 


TST44 




STESTN 


00^1404 




TST45 


002316 


$TN a 


000001 


010460 


TST46 


002350 


$TPB 


000510 


010560 


T8T47 


002406 


ITPCHR 


016660 


010654 


TST50 


002436 


ITPCNT 


000451 


010750 


TST51 


002514 


$TPS 


000512 


011044 


TST52 


002574 


8TSTM 


000434 


011144 


TST53 


002654 


STYPE 


016624 


011240 


TST54 


002734 


SUNIT 


000412 


011334 


TST55 


003012 


IUNXTM 


000440 


011450 


TST56 


003070 


SUSWR 


000424 


011544 


TST57 


003146 


, m 


016706 


01 1640 


TST60 


003226 




000430 


011734 


IST61 


003306 






012026 


TST62 


003364 







DFKACA MACYU 30(1046J 04-AUG-77 14109 PAGE 106 
DFKACA.SRC 18«NOV»75 00100 SYMBOL TABLE 

ERRORS DETECTEDI 

DFKACA,DFKACA3DFKACA,SRC/S0L 
RUN-TIMEJ 10 11 ,2 SECONDS 
PUN»TIME RATIOi 210/22=9,5 
COPE USEDi UK (21 PAGES) 



